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THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY 

ON A SINGLE COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH 
THE INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS 
SOFTWARE, OR ANY OTHER COPIES THEREOF, MAY NOT BE PROVIDED 
OR OTHERWISE MADE AVAILABLE TO ANY OTHER PERSON EXCEPT 

FOR USE ON SUCH SYSTEM AND TO ONE WHO AGREES TO THESE 
LICENSE TERMS. TITLE TO AND OWNERSHIP OF THE SOFTWARE 
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MENT BY DIGITAL EQUIPMENT CORPORATION. 
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REQUIREMENTS 
EQUIPMENT 
STORAGE 


LOADING PROCEDURE 
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SWITCH SETTINGS 
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RESTART ADDRESS =250 
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THIS DIAGNOST!C WILL TEST O - 124K OF MOS OR CORE MEMORY 


ON ANY PDP-11 FAMILY COMPUTER. 
FOR MOS AND SOME FOR CORE, 


SOME TESTS ARE WORST CASE 
BUT ALL TESTS ARE ALWAYS RUN. 


THE TESTS OCCUPIES LESS THAN 2K OF MEMORY SO IT CAN BE 
USED TO TEST A SYSTEM WITH ONLY 4K OF MEMORY. IF ONLY 4K 
HOWEVER, THE ABSOLUTE LOADER IS NOT SAVED. 


EXISTS, 


THIS PROGRAM CAN BE RUN UNDER XXDP, 


APT AND ACT MON! TORS. 


ON PROCESSORS WITH NO HARDWARE SWITCH REGISTER, SOFTWARE 
SWITCH REGISTER = LOCATION 176. 


GETTING 


IF NO HARDWARE SWITCH REGISTER SET LOCATION 176 TO OBTAIN SWITCH 


OPTIONS. 


STARTED 


SET SWITCH REGISTER = 00000 


STAR 


T AT 200. 


SEE SECTION 4.4 FOR REST OF PRINTOUTS EXPECTED. 


“END PASS #01" WILL BE TYPED LAST, 


REST 


TO HALT THE TEST, 


ART. 


A 
B. 
C. THE MEMORY LIMITS WILL BE PRINTED. 
D. 
E 
F 


TYPE CONTROL-C, 


AND THE TEST WILL 
THIS WILL INSURE THE 


PROGRAM IS RELOCATED BACK TO LOWER MEMORY. 


ERROR # IS TYPED SEE SECTION 6. Z. 


'CAU 


BE PATIENT. 


THE CONTROL-C 1S ONLY RECOGNIZED AT THE END 


OF THE CURRENT SUBTEST. 
G. IF AN UNEXPECTED HALT OCCURS SEE SECTION 6.0. IF AN 


TION! BEFORE “DIGGING” INTO THE LISTING READ 
SECTION 9. 


SWITCH SETTING SUMMARY (SEE SECTION 4.1 FOR DETAILS) 


B1T15(100000) 
B1T14(040000) 
B1T13(020000) 
B1T12(010000) 
B1T11¢004000) 
B1T10(002000) 
B1T09(001000) 
8 1T08(000400) 
B i T07(000200) 
B1T06(000100) 
8 1T05(000040) 
B 1T04 (000020) 
B1TO3-B81TOO 


HALT ON ERROR 


LOOP IN SUBTEST DEFINED BY BITS <3: 0 
INHIBIT ERROR PRINTOUTS 


ENABLE TESTING ABOVE 28K (MEMORY MANAGEMENT ) 
ENABLE PARITY TESTING 


HALT AFTER EACH SUBTEST 

INHIBIT PROGRAM RELOCATION 

TYPE FIRST FAILING BIT ERROR PER 4K. 
ENABLE LONG GALLOPING TEST 


INHIBIT MEMORY SIZING 


INHIBIT “END PASS #XX" PRINTOUTS 


INHIBIT PRINTOUTS 
BEGINNING TEST NUMBER. 
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REQUIREMENTS 
EQUIPMENT 


STANDARD 11 FAMILY COMPUTER WITH A CONSOLE OUTPUT DEVICE 
AND FROM 4K TO 124K OF MEMORY. 


STORAGE 


PROGRAM STORAGE - O000 - 7744. PROGRAM EXPANDS FOR ERROR 
HISTORY AND TO SAVE ABSOLUTE LOADER OR XXDP CHAIN MONITOR. 
(SEE SECTION 9. FOR DETAILS) 


LOADING PROCEDURE 
USE STANDARD PROCEDURE FOR PDP-11 ABSOLUTE BINARY FORMATTED TAPES. 


STARTING PROCEDURE 

SWITCH SETTINGS 

SOFTWARE SWITCH REGISTER = LOCATION 176 
B1T15(100000) HALT ON ERROR 


B1T14(040000) LOOP ON TEST DEFINED BY SWITCH REGISTER BITS <3: 
B1T*13(020000) INHIBIT ERROR PRINTOUTS 
B!1T12(010000) ENABLE TESTING ABOVE 28K. (MEMORY MANAGEMENT ) 


B1T11(004000) ENABLE PARITY MODULES. 

"PARITY" WILL BE TYPED 
B1T10(002000) HALT AFTER EACH SUBTEST 

'PRESS CONTINUE TO DO NEXT SUBTEST 
B1T09(001000) INHIBIT PROGRAM RELOCATION 

atte LOCATIONS 430-7776 WILL NOT BE 


BITO8(O000400) $TYPE FIRST FAILING BIT IN EACH 4K BANK ONLY. 
'THE TOTAL ERROR COUNT (UP TO 377) WILL 
'BE SAVED IN THE ERROR HISTORY. 
B1T07(000200) ENABLE LONG GALLOPING TEST. 
"GLP" WILL BE TYPED. 
‘CAUTION! INCREASES TEST TIME BY FACTOR OF 25. 
B1T06(000100) INHIBFT MEMORY SIZING. 
'THE MEMORY LIMITS MUST BE SETUP IN THE FOLLOWING LOCATIONS: 
(VALUES TO TEST O-8K ARE SHOWN) 
(LONTWO=LOCATION 322) 


LOWTWO: 0 *STORE BITS 17:16 OF LOW TEST ADDRESS 
LOWADD: 0 ;STORE REST OF LOW TEST ADDRESS 


SEQ 0004 
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HIGHTWO: Q *STORE BITS 17: 16 OF HIGH TEST ADDRESS 
HIGHADD: 37776 +STORE REST OF HIGH TEST ADDRESS 
NOTE: HIGHADD MUST BE SET TO A 4K BOUNDARY. (E.G. 37776) 


B1T05( 000040) INHIBIT “END PASS #XX" PRINTOUTS 
BiTO4(000020) A. INHIBIT ERROR HISTORY PRINTOUTS. THE 
ERROR HISTORY CAN STILL BE OBTAINED 
BY TYPING CONTROL-C. 
B. INHIBIT PRINTOUTS "PARITY", "GLP". "TST13 BNK Xx”. 


B1TO3-B1T00 NUMBER OF TEST (0-13) TO RUN FIRST. 
'NORMALLY USED WITH BIT14 (LOOP ON TEST) 


CONTROL-C OPTION 

CONTROL C C AFTER COMPLETION OF THE CURRENT TEST. 
THE ERROR HISTORY (SEE SEC. 6.3) WILL BE 
TYPED. THE PROGRAM WILL HALT IN LOWER MEMORY. 
PRESSING CONTINUE WILL RESTART THE DIAGNOSTIC. 


STARTING ADDRESS= 200 
RESTART ADDRESS = 250 OR 200 


RESTART AT 200 CLEARS PASS COUNT (SPASS) AND PRINTS "“DZKMA-D" TITLE. 


PROGRAM AND/OR OPERATOR ACTION 


1) LOAD PROGRAM INTO MEMORY USING ABSOLUTE LOADER. 
2) SET OPTIONS (SEE SEC. 4. 1) 
3) START THE PROGRAM AT 200 
4) THE FOLLOWING IS AN EXAMPLE WITH EXPLANATIONS 
OF THE PRINTOUTS EXPECTED. 
"XXXXX-YYYYY" ;ADDRESSES OF TEST BOUNDARIES. 
"PARITY" > IF PARITY OPTION SELECTED 
"=" > 1F LONG GALLOPING OPTION SELECTED. 
;PRINTED AS TST11 IS ENTERED. 
"TST13 BNK OO” ;ENTERING BANK OO IN TEST 13. 
"TST13 BNK 01" >AND BANK 1... 
4 ;UNTIL ALL BANKS (UP TO 6) HAVE BEEN TESTED. 
“"RELOC” >THE DIAGNOSTIC RELOCATES TO HIGHEST 
;BANK UNDER TEST. AND RUNS TSTO-TST13 AGAIN. 
"TST13 BNK OO” ; TESTING BANK OO IN TEST 13 (RELOCATED STATE. ) 
;NOTE-ONLY BANK OO IS TESTED IN THE RELOCATED STATE. 
"END PASS #XX" ;WHERE "XX" 1S THE PASS NO. 
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ADDITIONAL PRINTOUTS 
"NO PAR" 


“NO MNG" 


LONG GALLOP OPTION 
NORMAL WORST CASE SR 


12: 37 PAGE 6 


*PRINTED IF PARITY SELECTED BUT NOT AVAILABLE. 
*PRINTED IF GREATER THAN 28K AND NO MEMORY 


>MANAGEMENT AVAILABLE. 


SETTING = QO00. 


FOR LONG GALLOP 


SR = 200. LONG GALLOP OPTION SHOULD ONLY BE USED IF AN 
MOS MEMORY PROBLEM IS SUSPECTED ANC NO OTHER SUBTESTS 


WILL FAIL. THE TEST TIME 1S INCREASED 25 TIMES. 


PROGRAM HALTS (NORMAL+ ERROR) 


THIS 1S A LIST OF EXPECTED HALTS. 


1F THE TEST HALTS 


IN A LOCATION NOT IN THIS LIST AND ITS LESS THAN 776, IT 

MAY BE DUE TO A DEVICE INTERRUPTING. 
NOTE THE HALT AT END OF SUBTEST AND HALT ON ERROR HALT LOCATIONS 

MAY BE RELCCATED. THE ACTUAL LOCATIONS THEY ARE IN CAN BE FOUND 

BY SUBTRACTING 500 FROM 1664 SWHALT AND ADDING THIS DIFFERENCE TO THE 

CONTENTS OF SAVRE LOC. 346. 


PC 


6132 


6216 


ERRORS 
ERROR MESSAGE FORMAT 


REASON 


TRAP TO LOC. 4 


POWER FAIL 


HALT AT END OF 
TEST SWITCH SET. 


HALT ON ERROR 
SWITCH SET. 


CONTROL-C TYPED 
OR FATAL ERROR 
OCCURRED 


RECOVERY 


EXAMINE R6, IT CONTAINS 
THE POINTER TO THE PC 
WHERE THE TRAP OCCURRED. 


POWER UP WILL RECOVER 
IF IN CORE MEMORY. 


PRESS CONTINUE TO GO TO 
NEXT SUBTEST. 


PRESS CONTINUE. 


PRESS CONTINUE TO RE- 
START TEST. 


THE ERROR PRINTOUT CONSISTS OF 6 OCTAL WORDS IN THE FOLLOWING 


FORMAT: 


a ea eee 
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"LOCATION GOOD BAD PC ERROR PASFLG" 


“ADR ERR" WILL BE PRINTED PRIOR IF AN ADDRESSING ERROR IS SUSPECTED. 
“PAR ERR" WILL BE PRINTED PRIOR IF A PARITY ERROR TRAP OCCURRED 
‘CAUTION! IF PARITY ERROR THE GOOD DATA PRINTOUT IS THE 

PARITY MODULE UNIBUS ADDRESS THAT FRILED. 


WHERE 

LOCATION= FAILING MEMORY LOCATION 

GOOD = GOOD DATA DATA THAT WAS EXPECTED 

BAD = BAD DATA DATA THAT WAS FOUND 

PC = PROGRAM COUNTER AT ERROR CALL. 

ERROR = FAILING ERROR NO. (SEE SEC 6.2 - ERROR DICTIONARY) 
PASFLG = CONTENTS OF LOCATION PASFLG. THIS MAY NOT BE RELEVANT. 


(SEE SEC. 6. 2-ERROR DICTIONARY) 


'THE TEST WILL CONTINUE AFTER THE ERROR PRINTOUT. 
'"NO MNG" WILL BE TYPED IF TESTING ABOVE 28K SELECTED AND NO MEMORY 
'MANAGEMENT 1S FOUND. 


'"NO PAR" WILL BE TYPED IF PARITY OPTION SELECTED 
'AND NO PARITY MODULES WERE FOUND. 


(FATAL ERRORS) 


"ERROR #XXXXXX" WILL BE TYPED WHERE "XXXXXX" IS 

THE ERROR NUMBER. THE DIAGNOSTIC WILL USUALLY HALT ON THIS TYPE 
OF ERROR. SEE SEC. 6.2 -ERROR DICTIONARY - FOR DESCRIPTIONS 

OF THE ERROR. 


(APT MODE ERRORS) 


ALL ERRORS ARE TREATED AS FATAL UNDER APT. WHEN AN 
ERROR OCCURS UNDER APT A “1" IS STORED IN LOCATION 
SMSGTY AND THE PROGRAM HALTS AT FATHLT. 


SFATAL CONTAINS THE ERROR NO. IN THE LOW BYTE AND 
THE FAILING BANK NO. UNDER TEST IN THE HIGH BYTE. 


ERROR DICTIONARY 


THIS IS A LIST OF ERROR NUMBERS PRINTED AND POSSIBLE 
CAUSES FOR THE ERROR. 

THE ROUTINE NAME WHERE THE ERROR CALL ORIGINATED IS GIVEN IN 
BRACKETS. 
NOTE- "BAKPAT” REFERS TO THE BACKGROUND PATTERN WRITTEN INTO MEMORY 


SEQ 0007 | 


ca 
| 
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> ERROR 
> ERROR 
> ERROR 


; ERROR 


> ERROR 


; ERROR 


> ERROR 


> ERROR 


> ERROR 
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FOR VARIOUS TESTS. IF PARITY SELECTED IT HAS A VALUE = 376 .ELSE=377 
“SWAPPED BAKPAT" = 77000 IF PARITY SELECTED, ELSE=77400 


10 


11 


+ BUSER BUS ERROR TRAP TO LOC. 4 OCCURRED 
; THIS ERROR IS NOT PRINTED AND IS FOR "APT" USE. 


+ TSTTRP FATAL DATA ERROR 

*LOCATIONS O000-430 FAILED 1°S + O'S TEST. 
*RO = GOOD DATA 

;R1 = ADDRESS OF FAILING LOCATION. 


> APTSIZ APT FATAL ERROR 

;APT MEMORY TABLES NOT SETUP CORRECTLY. 
+CHECK LOCATIONS SMAMS1 430 TO SMADRY 446 
>, FOR CORRECT MEMORY SIZE DATA. 


> TSTSIZ OPERATOR FATAL ERROR 

>SELECTED MEMORY SIZE GREATER THAN 28K, BUT 
>SR BIT12 (10000) NOT SeT. 

>SET BIT12 AND RESTART AT 200. 


; TSTSIZ OPERATOR FATAL ERROR 

;LOWEST SELECTED TEST LIMIT 1S HIGHER THAN 
;HIGHEST TEST LIMIT. SET LOCATIONS “LOWTWO" 322 
;TO “HIGHADD" 330 CORRECTLY AND RESTART 

>AT 200. 


; TSTO #£OTEST SEQUENCE ERROR 

;TSTO HAS BEEN ENTERED OUT OF SEQUENCE 

; TESTN SHOULD = O00 

, THE DIAGNOSTIC HAS BEEN CORRUPTED. 

;1F POSSIBLE SELECT ANOTHER 4K BANK 

;BANK O AND RERUN THE TEST ON THE FAILING MEMORY. 


> TSTO DUAL ADDRESSING ERROR 

;FOR THIS ERROR THE GOOD DATA PRINTED IS AN 

;ADORESS. THIS 1S THE ADDRESS SELECTED WHEN 
; THE SAME DATA WAS WRITTEN INTO THE FAILING 

;LOCATION. CHECK BANK SELECT CIRCUITRY 


> TSTO ADDRESS AND DATA ERROR 

; IDENTICAL TO PREVIOUS ERROR EXCEPT THE DATA 
;WRITTEN INTO THE FAILING LOCATION WAS IN 
>ERROR ALSO. 


> TSTO DATA ERROR 
;1F BAD DATA = OCOO COULD BE AN ADDRESSING 
;ERROR . ELSE COMPARE GCOD AND BAD DATA FOR FAILING BITS. 


; TSTO ADDRESSING ERROR 
; THE FAILING ADDRESS RESPONDED BUT IS NON- 
;EXISTENT. MAY BE A DUAL ADDRESSING PROBLEM. 


. ar 
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> ERROR 
> ERROR 
> ERROR 
> ERROR 
» ERROR 
> ERROR 


> ERROR 


> ERROR 
de siieie 
> ERROR 
> ERROR 


> ERROR 
> ERROR 


> ERROR 


* 12 


* 13 


+ TST1 TEST SEQUENCE ERROR 
*S$TEST 4O4 SHOULD = O01 
; THE DIAGNOSTIC HAS BEEN CORRUPTED. 


+ TSTi DATA ERROR 
*COMPARE GOOD AND BAD PRINTED DATA, FRILING 
*DATA BITS MAY SHORTED OR SWAPPED. 


+ TSTZ TEST SEQUENCE ERROR 
*STESTN 4O4 SHOULD = 02 
; _ THE DIAGNOSTIC HAS BEEN CORRUPTED. 


+ TSTZ RDDRESS OR DATA ERROR 
> 1F “ADR ERR" NOT PRINTED THEN THE BYTE SELECT 
*CIRCUITRY PROBABLY FAILED. 


+ TST3 TEST SEQUENCE ERROR 
>+STESTN 4O4 SHOULD = O03 
; THE DIAGNOSTIC HAS BEEN CORRUPTED. 


; TST3 DUAL ADDRESSING ERROR 
;DUAL ADDRESSING PROBLEM FOR BITS THAT DIFFER 
> IN GOOD AND BAD DATA PRINTOUT. 


> TST3 DUAL ADDRESSING ERROR 
;FOR THIS ERROR THE DATA PRINTED IS AN ADDRESS. 
>THiS 1S THE ADDRESS THAT WAS SELECTED WHEN THE 


;SAME DATA WAS WRITTEN INTO THE FAILING LOCATION. 


+ TST3 DUAL ADDRESSING ERROR 
;SAME AS ERROR #20 EXCEPT DIFFERENT DATA 
; (SWAPPED BAKPAT) WAS WRITTEN. 


, TSTY TEST SEQUENCE ERROR 
A aiataian 404 SHOULD = QO4. 
THE DIAGNOSTIC HAS BEEN CORRUPTED. 


> TST4Y DUAL ADDRESSING ERROR 
> 1F PASFLG = O THEN THE FAILING LOCATION 
;AND FAILING DATA ARE DUAL ADDRESSES. 


; TSTS TEST SEQUENCE ERROR 
;STESTN 4O4 SHOULD = 05 
; THE DIAGNOSTIC HAS BEEN CORRUPTED. 


> TSTS DATA ERROR 

*DATA WRITE OR READ ERROR. 

; TSTS MARCHING 1'S AND O'S DATA ERROR 
;1F PASFLG=0 FAILED MARCHING 1°S + O'S IN 
i MAX TO MIN DIRECTION. 

7; 1F PASFLG=1 FAILED MARCHING 1'S + Q'S IN 
; MIN TO MAX DIRECTION 

>; 1F PASFLG=3 FAILED MARCHING O'S + 1°S IN 
; MAX TO MIN DIRECTION. 


; TSTS MARCHING 1'S AND O'S DATA ERROR 


- + eee oe 


Sn ae 
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>ERROR & 
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>ERROR & 


; ERROR & 


*ERROR & 


;ERROR & 


30 


31 


32 


34 


35 


36 


37 


40 


41 
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+ IDENTICAL TO PREVIOUS ERROR EXCEPT THE DATA IS 
+CHECKED IMMEDIATELY AFTER BEING WRITTEN. 


+ TST6 TEST SEQUENCE ERROR 
*+STESTN SHOULD = 06 
+ THE DIAGNOSTIC HAS BEEN CORRUPTED. 


> TST6@ VOLATILITY/REFRESH TEST ERROR 
> 1F PASFLG=0 BAKPAT WRITE OR READ ERROR. 
> 1F POSFLG=1 THE FAILING LOCATION CHANGED WHILE 


; ANOTHER LOCATIONS WAS WRITTEN FOR 
; : MS. THE OTHER LOCATION IS SAVED 
IN SAVLOC 352 | 


;1F PASFLG=2 SWAPPED BAKPAT (77400 OR 77000) 
: WRITE OR READ ERROR. 
SIF PASFLG=3 SAME AS IF PASFLG=2 EXCEPT 


; THE DATA 1S SWAPPED BAKPAT. 
; TST? TEST SEQUENCE ERROR 
;$TESTN SHOULD = 07 * 


>THE DIAGNOSTIC HAS BEEN CORRUPTED. 


> TST7 SHIFTING DIAGONAL DATA ERROR 

> 1F PASFLG=0 BAKPAT WRITE OR READ ERROR. 

> 1F PASFLG=1 BAKPAT READ CHECK ERROR 

> 1F PASFLG= GREATER THAN 1 BUT EVEN VALUE THEN: 

; THE FAILING LOCATION COULD NOT BE WRITTEN INTO. 
> 1F PASFLG= GREATER THAN 1 BUT ODD VALUE THEN: 

; THE FAILING LOCATION WAS WRITTEN CORRECTLY 

, BUT LOST THE DATA. 


+ TST10 TEST SEQUENCE ERROR 
>$TESTN SHOULD = 10 
, THE DIAGNOSTIC HAS BEEN CORRUPTED. 


>; TST10 BAKPAT DATA ERROR 
;BAKPAT WRITE OR READ ERROR INTO THE FAILING LOCATION. 


; TST10 READ RECOVERY DATA ERROR 

THIS ERROR CAN BE REPORTED BY TST10 AND TST11. 
THEY SHARE CODE). SEE STESTN 4O4% FOR WHICH TEST FAILED. 
;FOR BOTH TESTS COMPARE THE GOOD AND BAD DATA AT THE FAILING 
;LOCATION TO SEE WHICH BITS FRILED. 


; TST10 READ RECOVERY DATA ERROR 
; IDENTICAL TO THE PREVIOUS ERROR EXCEPT SHAPPED BAKPAT IS 
;USED AS WRITE AND READ DATA. 


; TST11 TEST SEQUENCE ERROR 
+$TESTN SHOULD = 11 
; THE DIAGNOSTIC HAS BEEN CORRUPTED. 


>; TST1Z2 TEST SEQUENCE ERROR 
;S$TESTN SHOULD = 12 
; THE DIAGNOSTIC HAS BEEN CORRUPTED. 


———— <= <= © 


SEQ a 
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> ERROR 
> ERROR 


> ERROR 


> ERROR 


> ERROR 


> ERROR 


> ERROR 


> ERROR 


; ERROR 
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+ TST1Z2 WORST CASE CORE TEST DATA ERROR 
> \F PASFLG=1 COMPARE GOOD AND BAD DATA FOR FAILING BITS. 
7 \F PASFLG=2 THE FAILING LOCATION WAS WRITTEN AND READ 
WITH GOOD DATA.BUT FAILED READ CHECK 
READING IN THE MIN. TO MAX DIRECTION. 
AF PASFLG=3 SAME CONDITIONS AS PASFLG=2 EXCEPT FAILED 
DOING THE READ CHECK FROM MAX TO MIN DIRECTION. 


; TST12 WORST CASE CORE TEST DATA ERROR 
IDENTICAL TO PREVIOUS ERROR EXCEPT THE DATA WRITTEN 
SAND READ 1S COMPLEMENTED. 


> TST13 TEST SEQUENCE ERROR 
*+STESTN SHOOULD = 13 
; THE DIAGNOSTIC HAS BEEN CORRUPTED. 


> TST13 WRITE RECOVERY TEST DATA ERROR 

> 1F PASFLG=0 COMPARE GOOD AND BAD DATA FOR FAILING BITS. 

i IF PASFLG=77400 DATA ERROR FOUND WHILE DOING A SECOND READ CHECK. 
i AF PASFLG=77402 DATA ERROR FOUND IN FAILING LOCATION AFTER 

SMALL TEST PROGRAM RUN IN FAILING BANK. 

» TST13 WRITE RECOVERY TEST DATA ERROR 

; DATA ERROR FOUNDJUST BEFORE THE SMALL TEST 

; WAS TO BE RUN IN THE FAILING BANK. TO AVOID “BLOWING” UP 

>WHEN THE SMALL TEST IS RUN TST13 IS ABORTED. 


> TsT13 WRITE RECOVERY TEST DATA ERROR 

IDENTICAL TO ERROR &XXX EXCEPT THE DATA WRITTEN 
"AND READ IS DIFFERENT. (177667). 
;177667 1S THE COMPLEMENT OF "“JMP (RO)" (110) WHICH IS 
; THE ESCAPE FROM THE SMALL TEST PROGRAM RUN IN THE BONK 
UNDER TEST. 


, PARERR PARITY TRAP ERROR 
; PARITY TRAP TO 114% OCCURRED. 
>FOR THIS ERROR PRINTOUT THE “GOOD DATA" IS ACTUALLY 
; THE FAILING PARITY MODULE UNIBUS ADDRESS. 
; SAVLOC 352 CONTAINS THE PC WHERE THE TRAP OCCURRED. 


; PARITY PARITY TRAP FATAL ERROR 
; A PARITY TRAP TO 114% OCCURRED. BUT NO PARITY MODULES COULD BE FOUND 
>WITH AN ERROR BIT (BIT15) SET. 


; NOMM OPERATOR FATAL ERROR 

; TESTING ABOVE 28K WAS SELECTED. BUT NG MEMORY MANAGEMENT 
; OPTION WAS FOUND. 

; RESET SWITCH OPTIONS AND RESTART AT 200. 


; PARITY OPERATOR FATAL ERROR 

PARITY TESTING WAS SELECTED BUT NO PARITY MODULES 
; WERE F OUND. 
; RESET SWITCH OPTIONS AND START AT 200. 


S. Se We Be 


—— Oe ee ee 
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6. 3 ERROR HISTORY 


LOCATIONS IN MEMORY ARE SET ASIDE TO COLLECT A HISTORY 
OF THE FAILING BITS IN A PARTICULAR MEMORY BANK. THIS 
pM A cumineg FOR EVERY ERROR REGARDLESS OF SWITCH 


NORMALLY THE DATA IS OUTPUT AT THE END OF TESTING, BUT 
IF CONTROL-C IS TYPED IT 1S OUTPUT AT THE END OF THE 
CURRENT TEST. 


THE ERROR HISTORY 1S INTENDED TO HIGHLIGHT IF THE ERRORS 
ARE DUE TO 1 BIT FAILING OR ONLY ADDRESS ERRORS. 


ERROR HISTORY FORMAT: 


ERROR BANK COUNT 


WHERE 
ERROR = BIT THAT FAILED NUMBER OF THE FAILING BIT IN DECIMAL |. E. 
0-15 WILL BE TYPED OUT OR THE WORDS "ADR ERR” OR "PAR ERR” WILL 
BE TYPED OUT IF ADDRESS ERROR OR PARITY ERROR WAS SEEN 
IN THE SPECIFIC BANK OF MEMORY 
BANK = 4K MEMORY BANK IN WHICH THIS FAILURE WAS SEEN 
AO FOR O TO 4K, A 1 FOR 4 TO 8K AND SO ON 
COUNT = NUMBER OF TIMES THIS MEMORY BANK FAILED. 


(377 1S MAXIMUM FAILURE COUNT RECORDED. ) 
6. 4 ERROR RECOVERY 


IF THE PROGRAM IS HALTED AFTER REPORTING AN ERROR IT CAN EITHER 

BE CONTINUED OR RESTARTED AT 200 OR 250 (SEE SEC 4.2). HOWEVER FOR 
CPU'S THAT DESTROY CONTENTS OF REGISTERS AFTER COMING TO A HALT 
THE PROGRAM SHOULD ONLY BE RESTARTED. 


7.0 RESTRICTIONS 
MEMORY UNDER TEST SHOULD BE CONTIGUOUS. FOR SYSTEMS HAVING NON- 
CONTIGUOUS MEMORY THE MEMORY BOUNDARIES SHOULD BE DEF !NED BY THE 


OPERATOR. (CONTIGUOUS MEMORY IS DEFINED AS A MEMORY THAT CAN BE 
BOTH READ AND WRITTEN IN CONSECUTIVE LOCATIONS. ) 


8.0 MISCELLANEOUS 


8. 1 ADDRESS/BANK RANGES IN OCTAL AND DECIMAL 


DZKNA 
DZKMAD. P11 


MACY11 30(1046) 
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THIS REFERENCE TABLE CROSS REFERENCES THE MEMORY BANK NO. S, 
THE RANGE AND THE PAR USED WHEN MEMORY MANAGEMENT IS ENABLED. 
IT 1S ALSO USEFUL TO SHOW STARTING ADDRESSES IN A PAR- 
TICULAR 4K BANK. 


BANK NO. 


—$Ovovno NOUS WhO 


DECIMAL 
RANGE 


O - 4K 
UK - 8K 
8K-12K 
12K-16K 


16K-Z0K 
ZOK-Z4K 
Z4K- Z8K 
Z28K~- 32K 


32K- 36K 
36K-4OK 
YOK-44K 
Y4K-4BK 


48K-52K 
52K-56K 
E6K-60K 
6UK-64K 


64K-68K 
68K-72K 
72K- 76K 
76K- 80K 
80K- 84K 
84K-88K 
88K-92K 
92K- 96K 
96K- 100K 


100K- 104K 
104K- 108K 
108K-112K 
112K-116K 


116K-12Z0K 
120K-124K 
124K-128K 


OCTAL 
RANGE 


000000-017776 
020000-037776 
040000-057776 
060000-077776 


190000-117776 
120000-137776 
140000-157776 
160000-177776 


200000-217776 
220000-237776 
240000-257776 
260000-277776 


300000- 317776 
320000- 337776 
340000- 357776 
360000- 377776 


400000-417776 
420000-437776 
44Q000-457776 
460000-477776 
500000- 517776 
§20000-537776 
540000-557776 
560000-577776 
600000-617776 


620000-637776 
640000-657776 
660000-677776 
700000-717776 


720000-737776 
740000- 757776 
760000-777776 


PAGE ADDRESS REGISTER 
USED/CONTENT UNIBUS ADDRESS 


0 Q9000 772340 
NOT USED 
NOT USED 
NOT USED 


NOT USED 
NOT USED 
NOT USED 
1 1600 772342 


2000 772344 
2200 772346 
2400 772350 
2600 772352 


3000 772354 


ome wWwnyK-ouwefl Who Uf whd 
£ 
om 
Oo 
Oo 


NOW fWwh 
| 
oe 
a 
oO 


7600 772354 


ES: 
THE PAR (PAGE ADDRESS REGISTER) CONTENTS ARE SHOWN IN A TES! THAT SELF SIZES. 


IF THE LIMITS OF TESTING ARE SET BY THE OPERATOR AND 
\F THE BANK IS ABOVE 28K PAR NO. 
BEGINNING PAGE. 


BEGIN WITH BANK 8 PAR NO. 
WOULD EQUAL 2200 ETC. 


1 WILL BE SET TO THE 
FOR EXAMPLE IF THE TESTING WAS TO 
1 WOULD EQUAL 2000. PAR 2 


SEQ 0013 
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8.2 


8.5 


9.0 


9.1 
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EXECUTION TIME 
HERE ARE SOME TYPICAL EXECUTION TIMES. 


LSi-11 AND 4K: = 100 SECS. 
LS!i-11 AND 8K: = 5 MINUTES. 


PASS COUNT AND TEST NO. LOCATIONS 
SPPSS 406 = PASS COUNT - CLEARED BY START AT 200. 
STESTN 4O4 = CURRENT TEST NO. AND RELOCATION. PARITY FLAGS. 
= TEST NO. 
IF BIT1S = 1 TEST IS RELOCATED 
IF BIT13 = 1 PARITY UNDER TEST. 
STACK POINTER 
THE STACK STARTS AT SOO WHEN THE PROGRAM IS NOT RELOCATED. 


SAVR6 346 CONTAINS THE STACK STARTING VALUE WHEN THE DIAGNOSTIC 


IS RELOCATED. 


SAVR6 ALSO CONTAINS THE STARTING ADDRESS OF THE PROGRAM WHEN 


IT 1S RELOCATED. 
POWER FAIL 


THE DIAGNOSTIC CAN BE POWER FAILED WITH NO ERRORS. TO USE. 
START THE TEST AS USUAL AND POWER DOWN THEN UP AT ANY TIME. 
THE PROGRAM SHOULD TYPE "P" AND CONTINUE TO RUN FROM TEST 0 
IN THE SAME STATE 1.£. STATE OF RELOCATION AS IT WAS BEFORE 
THE POWER WAS INTERRUPTED. HOWEVER IF THE DIAGNOSTIC WAS IN 
A MEMORY THAT CAN NOT HOLD DATA WITH THE POWER DOWN THEN THE 
PROGRAM WILL NOT RECOVER FROM POWER FAIL. 


PROGRAM DESCRIPTION 


NARRATIVE FLOW CHART 
THE TEST IS LOADED INTO LOCATIONS 0000 - 7744 BUT 


EXPANDS DEPENDING ON HOW MUCH MEMORY |S UNDER TEST. 
SEE STEP 6 BELOW FOR A DETAILED EXPLANATION. 


THE FOLLOWING NARRATIVE FLOW CHART DESCRIBES MAJOR 


PROGRAM OPERATION. FOR THE PERSON WHO NEEDS DETAIL THE 
TAG ASSOCIATED WITH THE OPERATION IS GIVEN IN BRACKETS. 


FOR THIS DISCUSSION SWITCH SETTINGS ARE IGNORED AND EVERYTHING IS 


ASSUMED ENABLED. 


-—— ee ee, 


SEQ 0014 
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1. 
2. 


x Wm 


10. 


11. 


START PRINT "“DZKMA-D" TITLE 


TSTRP SAVE DATA FROM LOCATIONS 0-376 
INTO 7744-10314. 


TSTRP TEST LOCATIONS 0-376 BY WRITING AND 
READING 1°S AND O'S. NOTE THIS IS THE ONLY 
EXPLICIT TESTING OF THESE LOCATIONS. 


SLFSIZ SIZE MEMORY BY WRITING INTO SUCCEEDING 
MEMORY LOCATIONS UNTIL TIMEOUT TRAP TO 4 OCCURS. 
— MEMORY MANAGEMENT AND SIZE MEMORY ABOVE 

K. 


TYPS!2 TYPE MEMORY TEST LIMITS. 

SETSTK SPACE IS SAVED AT THE END OF THE TEST 

FOR AN ERROR HISTORY. FOR EACH 4K BANK 18 BYTES ARE SAVED 
IN THE FOLLOWING FORMAT: 


'ADR ERR'!PAR ERR! 
‘BiITiS 'ERR CNT! 


iBITIS 'BiITi ! 
'‘BiTii 'BITiz |! 
'BITO9 ‘'BIT10 $3! 
'BliO7 'BITO? $3! 
'BITOS 'BiTOe ! 
'BITOS ‘'BITOY ! 
'BiTO1 ‘'BITOZ2 ! 


'UNUSED !B81TOO 


IF GREATER THAN 4K UNDER TEST THE ABSOLUTE LOADER 
(300 ADDRESSES) 1S APPENDED. IF GREATER THAN 4K 
AND UNDER XXDP CHAIN MODE 5674 (OCTAL) ADDRESSES 
ARE APPENDED TO THE TEST. THIS SAVES THE XXDP 
MONITOR, AND ALLOWS THE LOCATIONS OCCUPIED BY XXDP 
TO BE TESTED. 


CLRMEM CALL "PARITY" ROUTINE AND IF SELECTED. 
ENABLE ALL PARITY MODULES. “PARMAP™ LOC. 352 
CONTAINS A MAP OF PARITY MODULES FOUND. IF 
eg 172336 BIT 15 IS SET. IF #172334 FOUND BIT 14 
iS Sev Eve... 


CLRMEM CLEAR MEMORY CURRENTLY UNDER TEST 
CONT DISPATCH TO TSTO 


TSTO EXECUTE TEST 0. SEE SECTION 10 FOR TEST 
DESCRIPTIONS. 


TSTSCP COMES HERE AFTER EACH TEST AND IF 
CNTRL-C TYPED THEN GO TO ERROR HISTORY PRINTOUT. 
IF SR=2000 THEN HALT 
1F SR=40000 THEN LOOP ON TEST DEFINED BY <3: 0D 


SEQ 0015 
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ELSE CONTINUE TO NEXT TEST. 
12. TSTi-TSTiZ2 EXECUTE TSTI-TST1Z2 EACH TIME 


GOING TO 
is. TStts 


STEP 9. 
TEST 13 1S DIFFERENT FROM TESTS 0-12, 


BECAUSE IT IS A SMALL PROGRAM ACTUALLY RUNNING 
IN THE MEMORY UNDER TEST. BEFORE THIS SMALL 
PROGRAM IS STARTED “TST13 BNK XX" IS TYPED. 
THIS 1S DONE IN CASE THE PROGRAM FRILS . THE 


USER CAN 
FAILED. 


14. RELOC 


THEN AT LEAST TELL WHICH BANK OF MEMORY 


THE PROGRAM RELOCATES TO HIGH MEMORY 


TO TEST THE LOCATIONS IT OCCUPIES. (430-ENDPRG). 
WHERE “ENDPRG" |S THE CONTENTS OF ENDSTK 306 . 

|.— THE LAST PROGRAM ADDRESS. NOTE "“RELOC” IS 

PRINTED JUST PRIOR TO THE ACTUAL RELOCATION. 


15. TESTS 0-13 ARE RUN AS DESCRIBED ABOVE EXCEPT 
ONLY BANK 0 LOCATIONS 430-ENDPRG ARE TESTED. 


16. RELOER 
MEMORY. 


17. LOWER 
HISTORY. 


18. TSTMNM 


RELOCATE THE PROGRAM BACK TO LOWER 


IF CONTROL-C TYPED GO PRINT ERROR 


IF MEMORY MANAGEMENT SELECTED AND AVAILABLE. 


PUN TESTS 0-13 ON THE FIRST 24K SLICE ABOVE 28K. 


19. CONTMM 


CALL “UPMM" TO UPDATE MEMORY MANAGEMENT 


PAR REGISTERS TO POINT TO THE NEXT 24K SLICE OF 
UPPER MEMORY. 


20. MAXADR 


REPEAT STEPS 18 + 19 UNTIL ALL’ 


MEMORY ABOVE 28K IS TESTED. 


21. ENDPAS 
22. SEOP 


PRINT ERROR HISTORY OF FAILING BITS 


DISABLE PARITY MODULES. 


PRINT "END PASS #XX" 


TEST TITLES 
SEE THE TEST 


TEST 
TEST 
TEST 
TEST 
TEST 
TEST 
TEST 


HEADINGS IN THE LISTING FOR DETAILS ON EACH TEST. 


TEST FOR PROPER BANK SELECTION 
CHECK DATI/DATO LINES 


DUAL ADDRESS TEST A 
DUAL ADDRESS TEST B 
MARCHING 1'S AND O'S 
CELLS' VOLATILITY TEST 


SMstuy=o 


TEST MEMORY FOR HOLDING DATA AND BYTE SELECTION 


ee me ee eee ee 


SEQ 0016 


DZKMA MACY11 3001046) 15-AUG-77 12:37 PAGE 17 


DZKMRD P11 


10.0 


15-AUG-77 12: 36 


TEST 7: SHIFTING DIAGONAL 

TEST 10: READ RECOVERY GALLUPING TEST THROUGH EVERY 64TH CELL 
TEST 11: READ RECOVERY LONG GALLOPING/FAST GALLOPING TEST 
TEST 12: WORST CASE TESTING FOR CORE MEMORY 

TEST 13: WRITE RECOVERY TEST 


RXDP & ACT11 & APT OPERATION 
RXDP CHAIN MODE 


OPERATION IS 'DENTICAL TO STAND ALONE EXCEPT: 


NO "DZ2KMA-D" TITLE 1S PRINTED. 

NO TEST 13 PRINTOUTS SUCH AS “TST13 BNK 00". 

THE PROGRAM ALWAYS HALTS ON ERROR. 

AT THE END OF TEST (SENDAD) CONTROL IS RETURNED TO 
THE RXDP CHAIN MONITOR VIA LOCATION 42. 


“al nt et 


OPERATION IS IDENTICAL TO STAND ALONE EXCEPT: 


1. NO PRINTOUTS EXCEPT ERROR PRINTOUTS. 

2. THE PROURAM ALWAYS HALTS ON ERROR. 

3. AT THE END OF TEST (SENDAD) CONTROL IS RETURNED TO 
THE ACT11 MONITOR VIA LOCATION 42. 

APT 


OPERATION 1S SIMILAR TO STAND ALONE EXCEPT: 


THE SOFTWARE SWITCH REGISTER BECOMES LOCATION 422 (SSWREG). 
AUTO SIZING CAN BE INHIBITED BY SETTING BIT 7 OF BYTE 
LOCATION 421 (SENVM). 

ALL PRINTOUTS CAN BE INHIBITED BY SETTING BIT 5 OF 

BYTE LOCATION 421 (SENVM). 

ALL ERRORS CAUSE LOCATION 400 (SMSGTY) TO BE SET = 

0001 AND THE PROGRAM HALTS AT LOCATION 6214 (FATHLT). 
‘OCATION 402 (SFATAL) CONTAINS THE ERROR NO. IN THE 

LOW BYTE AND THE FAILING MEMORY BANK NO. IN THE HIGH 

BYTE. 


APT MANAGER INFORMATION 

THE FOLLOWING IS AN EXAMPLE SCRIPT TO TEST A 4K MEMORY. 
IT 1S RECOMMENDED THAT DIFFERENT SCRIPTS BE USED FOR 
DIFFERENT MEMORY SIZES TO SAVE AUTO SIZING TIME. 

THE EXAMPLE ASSUMES YOU ARE LOGGED INTO THE APT MONITOR 


READY 


Yr re 


ee a eae a eee — —— - oy 
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RUN APPLU 
APT 11 PAPER TAPE PROGRAM LOAD UTILITY 


THE FOLLOWING COMMANDS ARE VALID 


ED EDIT A PROGRAM 
LI LIST A PROGRAM 
COMMAND: ED 


PROGRAM NAME TO EDIT: EXAMPL 

DO YOU WANT TO LOAD A NEW REV OF THE PROGRAN‘Y/N)? N 

FIRST PASS RUN TIME IN SECONDS <110>: 

LONGEST TEST TIME IN SECONDS <10): 

ADDITIONAL RUN TIME IN SECONDS <O>: 

WHICH ETABLE DO YOU WISH TO EDIT? A 

SOFTWARE ENVIRONMENT<OOO>: = 1 

ENVIRONMENTAL MODE<O00>: 240 

SWITCH 1 <O00000>: 

SWITCH 2 <Q00000>: 

CPU OPTIONS<O0G0>: 

MEMORY TYPE 1 <000>: 

MAXIMUM ADDRESS<O00000000>. 

MEMORY TYPE 2 <O0O>: 

MAXIMUM ADDRESS<00000000>: 

MEMORY TYPE 3 <O00O>: 

MAXIMUM ADDRESS<O0000000>: 

MEMORY TYPE 4 <OO0>: 1 

MAXIMUM ADDRESS<O00000009>: 17°76 

WHICH ETABLE DO YOL WISH T?) EDIT? 
COMMAND: OFF 


SEQ 9018 


cc cr nw en ee = ee ee ee el et 
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. ABS 
-NLIST 


000042 


000046 


— 000052 


000070 
000076 
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MD, MC, CND 
LIST ME, BIN, SEQ, LOC 
TITLE DZKMA 
;KCOPYRIGHT (C) AUGUST 1977 
;KDIGITAL EQUIPMENT CORP. 
: XMAYNARD. MASS. 01754 
:XPROGRAM BY PERVEZ ZAKI 
,x 
/ATHIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
; XPACKAGE (MAINDEC-11-DZ2QAC-C3), JAN 19, 1977. 
160000 $SuRs 160000 :;HALT ON ERROR, LOOP ON TEST, INHIBIT ERROR TYPOUT 
>: TRAP CATCHER OF .+2 AND HALT FOR 0-776 LOCATIONS 
000240 SCOPE  =NOP 
000042 £42 
000000 “WORD 0 SFOR ACT/XXDP 
SBTTL ACT11 HOOKS 
Iie yo p-oripy-+-+-tah- sett aan aaa tana ate 
“HOOKS REQUIRED BY ACT1I 
000044 SSUPC=. SAVE PC 
000046 =46 
000156 SENDAD 5: 1)SET LOC. 46 TO ADDRESS OF SENDAD IN . SEOP 
000052 “252 
040000 “WORD 4oo00 >; 2)SET LOC. 52 TO 4o000 
000044  SGSUPC RESTORE PC 
000070 z” 
012737 000136 300024 PWRDN: MoV SPLIRUP. ag 24 
000000 HALT 


SEQ 0019 
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1023 
1024 
1025 
1026 
1027 
1028 
1029 
1030 
1031 
1032 
1033 
1034 
1035 
1036 
103? 
1038 
1039 
1040 
1041 
1042 
1043 
1044 
1045 
1046 
1047 
1048 
1049 
1050 
1051 
1052 
1053 
1054 
1055 
1056 
1057 
1058 
1059 
1060 
1061 
1062 
1063 
1064 
1065 
1066 
1067 
1068 
1069 
1070 
1071 
1072 
1073 
1074 
1075 
1076 
1077 
1078 


000104 
000110 
000112 


000120 
600122 
000126 
000130 
000132 
000134 


0001 36 
000142 
000146 


000150 
000152 


000154 


000156 
000160 
000162 
000164 
000166 


000176 


000104 


005237 
000000 
000000 


000120 


010401 
013700 
010021 
020105 
103775 
000207 


013706 
012700 
060600 


004710 
000120 


000411 


004710 
000240 
000240 
000240 
0004 30 


000176 
000000 
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000400 


000316 


000350 
006072 


12:37 PAGE 20 
ACT11 HOOKS 


. =104 
+; GET HERE IF AN ILLEGAL TRAP TO LOC. 


4 OCCURRED. 
BUSER: INC a8 SNSGTY >TELL APT FATAL ERROR#&OOO 
HALT ;XERRORX TRAP TO LOC. 4 OCCURRED. 


HALT > IN CASE CONTINUE PRESSED. 
+114 AND 116 a RESERVED FOR PARITY TRAP VECTORS. SETUP IN 
+ROUT INE aa 

.=1 


>*k WRITE MEMORY BACKGROUND 


x 
x 
; x THIS ROUTINE IS USED TO WRITE THE MEMORY BACKGROUND TO 
7x THE VALUE STORED AT LOCATION BAKPAT. THE ROUTINE ASSUMES 
x THAT RY IS POINTING TO THE LOWEST LOCATION AND R5 TO THE 
t HIGHEST LOCATION TO BE WRITTEN. THE PROGRAM LEAVES THE 
4 SUBROUTINE WITH RO CONTAINING THE CONTENTS OF BAKPAT. 
t 


WRTMEM: MOV R4Y,R1 ;SET R1 TO LOWEST LOCATION UNDER TEST 
MOV ae BAKPAT, RO ;LOAD RO WITH THE CONTENTS OF LOCATION BAKPAT 
2% MOV RO, (R1)+ :;STARTING FROM THE LOWEST LOCATION WRITE THE 
CMP R1,R5 ;MEMORY TO BACK GROUND PATTERN 
BLO 2$ 
RT= PC ;RETURN FROM THe SUBROUTINE 
PWRUP: MOV a# SAVRE, SP ;RESTORE STACK POINTER 
MOV #PNTMES-BEGIN. RO 
ADD SP.RO ,GET THE INDIRECT ADDRESS OF LOCATION TPCRLF 
;RELATIVE TO LOCATION OF DIAGNOSTIC IN THE CORE 
JSR Pc, (RO) ;G0 TO THE TYPE ROUTINE AND TYPE CR. LF AND A "PP" 
-ASCIZ /P7 
EVEN 
BR START 
>%* SERVICE XXDP/ACTI1 
SENDAD: JSR Pc, (RO) ;RETURN TO ACT11/7XXDP MONITOR 
NOP ;1F QUICK VERIFY=RESET ELSE NOP 
NOP / IF QUICK VERIFY=CLR #-1 ELSE INC 4&0 
NOP ;1F QUICK VERIFY=BR . -4 ELSE NOP 
BR Re STRT ‘REPEAT TEST UNDER ACT11/XxXDP 
.2=176 
SWREG: .WORC 0 


eo $0000 0000000605000000990009090098000308008050585502 02585055583 
SBTTL START AND RESTART ROUTINES 

:¥ RESTART AT 200 TO CLEAR APT TABLES 

ee $$ 500500 00000000000985000030 0000 Fos SCoPE COSTE TOTES SESE SEER ERS S 


SEQ 0020 © 


—— ee —e -- — oo we oe = 
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1079 
1080 
1081 
1082 
1083 


000200 
000204 
000210 
000212 
000216 
000220 
000224 
000226 
000232 
000234 
000240 
000246 


000250 
000254 
000260 
000262 
000264 
000266 
000272 
C00274 


00002" 
000044 


000276 
000276 
000300 
000302 
000304 
000306 
000310 


013706 
012703 
005043 
022703 
001374 
105737 
001011 
105737 
100406 
004767 
055104 
000104 


012704 
012703 
012305 
012306 
019600 
012746 
C10046 
000002 


000276 
000024 
000200 
000044 
000276 
000276 


000000 
000400 
000012 
000156 
000000 
000024 


000405 


15-AUG-77 
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000350 
000412 


000400 
000042 
000405 


006324 
046513 


007744 
000346 


D00346 


026501 


12:37 PAGE 21 
START AND RESTART ROUTINES 


START: 
1$: CLR 


RESTRT: 


ee eee eee ee - oe = -o oe ow oo -_- - - — 


| 2 
SEQ 0021 


dF SAVREG, SP ;SETUP STACK POINTER. 

#SUNIT. RS ;CLEAR THE APT MAILBOX FROM SMAIL TO SDEVCT 
-(R3) >CLEAR A MAILBOX LOCATION 

RSMAIL,R3 ; DONE? 

1$ ;BRANCH IF NO 

a#42 ;ACT11 MODE? 

RESTRT +BRANCH IF YES 

OF STESTNG1 ;ARE WE PELOCATED? 

RESTRT ;BR IF YES- SINCE TPCRLF IS RELOCATED ALSO- 
PC, TPCRLF ;PRINT TITLE | : 
/DZKMA-D/ 
FENDPRG, RY ;LOAD RY WITH THE ADDRESS OF THE END OF THE PROGRAM 
RSAURS.RS ;CAUSE R3 TO POINT TO THE LOCATION SAVRS 
(R3)+,R5 >RESTORE RS 

(R3)+, SP ,AND RESTORE R6 JUST IN CASE IT IS A RESTART 
SP. RO >PLACE THE STARTING ADDRESS OF THE TEST IN RO 
#340, -(SP) >SET HIGH PRIORITY FOR RTI 

RO, -(SP) 


>GO TO “START"-MAY BE RELOCATED. 
> 1F RELOCATED SEE LOCATION SAVR6 FOR START. 


_SBTTL APT PARAMETER BLOCK 


oe e220 200900000509 09 0099005900000 0009200927 2090908039908 7595282 2: 
>SET LOCATIONS 24 AND 44 AS REQUIRED £OR APT 
me 290900909 0096090090 0909052909902 00 0992990000230 93 9298955092 )) 2 | 


. $X=. 
.=24 
200 

. =44 


>, SAVE CURRENT LOCATION 

;;SET POWER FAIL TO POINT TO START OF PROGRAM 
>;FOR APT START UP 

>;PQINT TO APT INDIRECT ADDRESS PNITR. 


SAPTHDR ;;POINT TO APT HEADER BLOCK 


=, $X 


;;RESET LOCATION COUNTER 


> MEKKRKAAAEKAKAARAR KARA AAA AREA AAA AAA AERA AAA AAA AAA AR AAA RAR AA 
;SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 


> INTERFACE SPEC. 


SAP THD: 
SHIBTS: . WORD 
SMBADR: . WORD 
STSTM: . WORD 
SPASTM: . WORD 
SUNITM: . WORD 
_ WORD 


REL=STESTN+1 


>; TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 


SMAIL ;; ADDRESS OF APT MAILBOX (BITS 0-15) 
10. ;;RUN TIM OF LONGEST TEST 
110 ;;RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 


;;ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
SETEND-SMAIL/2 .; LENGTH MAILBOX-ETABLE (WORDS) 


-1T WILL BE 0 IF THE PROGRAM 'S IN THE LOWER 


ee re ee mm =. 
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000276 


000277 


000300 


000301 


000302 
OCO304 
000306 


000310 


000312 
000312 


000314 
000315 


000316 


000320 
000322 


000324 
000326 


009276 


00027? 


000300 


000301 


000302 
000304 
000306 


000310 
000312 


006314 
000 


000 


177580 
177562 
177564 
177566 
177572 
000377 


000000 
0004 30 


000000 
000000 


15-RUG-77 


15-AUG-77 12: 36 


12:37 PAGE 22 


APT PARAMETER BLOCK 


MMAVA: 


TYPENB: 


SPRERR: 


SADERR: 


STRTOi: 


LOWBNK: 
PASFLG: 


ENDSTK. 


PBNK: 


DECWRD: 
TYPCNT: 
SAVKBB: 


. EVEN 


TKS= 
SKBB= 
STPS=- 
$TPB= 
SRO= 


BAKPAT: 


SWAPAT: 
RELBOT: 


. =S$APTHD 


_ sMMAVAF1 


. = TYPENB+1 


. =SPRERR+1 


_ =SADERR+1 
 =STRTDI+2 


. =LOWBNK+2 


_ = PASFLG+2 
_ZENDSTK+2 


. SDECWRD+2 


_ BYTE 
. BYTE 


177560 
177562 
177564 
177566 
177572 
. WORD 


WORD 


BEGIN-50 


0 
0 


377 


A Te 


SEQ 0022 


;CORE. BIT 7 OF THE BYTE WILL BE SET IF THE 
;PROGRAM IS IN A RELOCATED STATE AND BIT 5 
;WILL BE SET IF PARITY BITS ARE BEING TESTED 


> THIS BYTE !S USED TO DETERMINE IF MEMORY 
;MANAGEMENT IS AVA'ILABLE OR NOT 


> THIS BYTE IS USED TO DETERMINE IF THE 
; TYPE OUT OF ERROR HAS BEEN ENABLED OR NOT 


> THIS BYTE DETERMINES IF THE PROGRAM HAS FOUND 
>A PARITY ERROR 


>THIS BYTE 1S USED TO DETERMINE IF THE 
PROGRAM HAS ENCOUNTERED ADDRESS ERROR 


>LOWER BYTE OF THIS WORD GIVES THE PASS NUMBER FOR 
>THE SPECIFIC TEST WHEREAS THE UPPER BYTE 
/>HAS BEEN USED BY DIFFERENT TEST FOR DIFFERENT PURPOSES 


>HOLDS BANK UNDER TEST FOR “TST BNK XX" PRINTOUT. 


; THIS BYTE DETERMINES THE NUMBER OF WORDS 
>TO BE TYPED 

> THIS LOCATION IS USED TO SAVE THE CHARACTER 
-HIT BY THE OPERATOR 

/-ALSO 1S USED AS TEMP IN ROUTINE $GTS1Z. 


>BACKGROUND PATTERN WRITTEN TO MEMORY. 


*HOLDS LOWEST TEST ADDRESS WHEN RELOCATED. 


oe oo 00 000000000000000000055805005008 000022900098 99 2952290290889 9' 
;LOCATIONS TO BE MODIFIED IF LIMITS SET BY OPERATOR 
LOWTWO: 9 


LOWADD: 


0 


>HOLDS BITS 17: 16 OF LOW TEST ADDRESS 
»>HOLDS BITS 15:0 OF LOW TEST ADDRESS 
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1191 
1192 
1193 
1194 
1195 
1196 
1197 
1198 
1199 
1200 
1201 
1202 
1203 
1204 
1205 
1206 
120? 
1208 
1209 
1219 
1211 
1212 
1213 
1214 
1215 
1216 
1217 


000330 
000332 


000334 
000336 


000340 


000342 
000344 
000346 


000350 
000352 
000354 
000356 
000360 


600000 
037776 


000000 
017776 


000000 


000000 
000000 
600000 


000500 
000000 
000000 
000000 
oc00cd 
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APT PRRAMETER BLOCK 


H!GHTWO: + HOLDS BITS 17:16 OF HIGH TEST ADDRESS 
H 1 GHADD: 37776 HOLDS BITS 15:0 OF HIGH TEST ADDRESS 
MET Srtsstttttsttt titi ttt ttttittit titi tttet ttt ttt titi tits 


SHIMAX: 0 ;HOLDOS BITS 17:16 OF MAXIMUM AVAILABLE MEMORY 
SMAXM: 17776 ;HOLDS BITS 15:0 OF MAXIMUM AVAILABLE MEMORY 
MAXMEM: . WORD ;MAXIMUM CURRENT VIRTUAL MEMORY UNDER TEST 

SAVMAX: . WORD 

SAVR4Y: . WORD 

SAVRS: . WORD 


>& SAVR6 POINTS TO WHERE THE PROGRAM STARTS EVEN WHEN RELOCATED. 


SAVR6: .WORD BEGIN ;CONTAINS START ADDRESS WHEN RELOCATED ALSO. 
PARMAP: 0 ;MAP OF PARITY MODULES UNDER TEST. 

SAVLOC: 0 TEST 6 STORES ERROR INFO HERE 

PARSP: Q ;SAVE SP DURING PARITY ERROR TRAP. 

PARPS: 0 ; SAVE PSW DURING PARITY ERROR TRAP. 


;NOTE-PARSP +PARPS ARE NEEDED SINCE THERE IS 

> 1S NOT ENOUGH POOM ON THE STACK (500-452) AND 
;>SO THE STACK MUST BE RESET IN THE PARERR ROUTINE. 
> IN THIS CRUDE FASHION. 


>¥364-400 if USED AS A STACK AREA BY ERRCHK ROUTINE FOR ERROR HISTORY PRINTOUT 


ee eee ns se 


SEQ 0023 | 


: 


oe 
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000400 
000400 
000402 
000404 
000406 
000410 
000412 
000414 
000416 
000420 
000420 
000421 
000422 
000424 
000426 


0004 30 
0004 31 


0004 32 


0004 34 
0004 35 
0004 36 
000440 
00044 1 
000442 
000444 
000445 
000446 
000450 
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000400 


000000 
000000 
000000 
000000 
000000 
000000 
00C000 
000000 


000 
000 
000000 
000000 
000006 


000 
000 


000000 


000090 
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APT PARAMETER BLOCK 


. 24900 
_SBTTL APT MAILBOX-ETABLE 





1° paternal tbe rivet eo tint te 
VEN 


SNAIL: 


SMSGTY: . 


SFATAL: 


STESTN: . 


SPASS: 


SOEVCT: . 


SUNIT: 


SMSGAD: . 


S$MSGLG 


SETABLE: 


SENV: 
SENUM: 


SSWREG: 


SUSUR: 


, 


Pt DE DE FE PE DE 


SMANS 1: 
SMNTYP 1: 
> x 


;x 
;Xx 


SCPUOP: 


;x 
SMADR 1: 
;x 
SMANMS2: 
SMTYP 2: 


SMAOR Z: 
SMANSS: 
SMTYP 3: 
SMADR 3: 
SMANSH: 
SNTYP4: 
SMADRY: 
SE TEND: 


_MEXIT 


. BYTE 
BYTE 


. WORD 


. BYTE 
. BYTE 
. WORD 
. BYTE 
. BYTE 
. WORD 
. BYTE 
. BYTE 
. WORD 


AMSGTY 
AF ATAL 


AMSGLG 


RENV 
RENVM 
ASWREG 
AUSWR 
ACPUOP 


AMANS1 
ANTYP 1 


AMADR 1 


AMANSZ 
AMTYPZ 
AMADRZ 
AMANSS 
ANTYP3 
AMADOR 3 
AMNANS4 
ANTYP4 
AMADRY 


;;APT MAILBOX 
;;MESSAGE TYPE CODE 
;;FATAL ERROR NUMBER 
;; TEST NUMBER 
>,PASS COUNT 
+>;DEVICE COUNT 
+; 170 UNIT NUMBER 
;>MESSAGE ADDRESS 
>; MESSAGE LENGTH | 
;;APT ENVIRONMENT TABLE 
;; ENVIRONMENT BYTE 
;; ENVIRONMENT MODE BITS 
;;APT SWITCH REGISTER 
,;USER SWITCHES 
;;CPU TYPE. OPTIONS 
BITS 15-11=CPU TYPE 
11/04%=01,. 11/05=02. 11/20=93, 11740=04, 11745=05 
11/70=06, PO0Q=07, Q=10 
BiT 10=REAL TIME CLOCK 
BIT 9=FLOATING POINT PROCESSOR 
BIT S8=MEMORY MANAGEMENT 
;;HIGH ADDRESS.M.S. BYTE 
;;MEM. TYPE, BLK#1 
MEM. TYPE BYTE -- (HIGH BYTE) 
900 NSEC CORE=001 
300 NSEC BIPOLAR=002 


>>HIGH ADDRESS. BLKAl 
MEM. LAST ADDR. =3 BYTES. TH!S WORG AND LOW OF “TYPE” ABOVE 

;;HIGH ADDRESS... S. BYTE 

,; MEM. TYPE. BLK&Z 

;;MEM. LAST ADDRESS, BLK#2 

>;HIGH ADDRESS. M. S. BYTE 

>;MEM. TYPE-BLK#3 

>; MEM. LAST ADDRESS. BLK&#3 

>; HIGH ADDRESS.M. S. BYTE 

>; MEM. TYPE. BLK&4 

;;MEM. LAST ADDRESS, BLK&4¥ 


pe O09 0 00000000000800990009005 000000092 0929909992 9907503920220008' 
_SBTTL BEGIN CF AREA TESTED (+20) WHEN PROGRAM RELOCATES. 


500 NSEC MOS=003 


Mh 2 


DZKNA MACY11 3061046) 15-AUG-77 12:37 PAGE 25 
DZKNAD. P11 15-AUG-77 12: 36 BEGIN OF AREA TESTED (+20) WHEN PROGRAM RELOCATES. SEQ 0025 
1266 eset stest teste st tet ess esse estes test esses ste s tess st esses sees aes. 
1267 000450 177570 SUR: 177570 ;CHANGES TO SWREG IF NO HARDWARE SWITCH REGISTER 
1269 000500 2500 
1270 000500 010706 BEGIN: MOV PC, SP ;SET UP STACK POINTER TO EQUAL BEGIN ADDRESS 
1272 000502 005746 TST -(SP) 
1273 000504 010637 000350 MOV SP, AKSAVRE ; SAVE SP FOR FUTURE USE 
1274 000510 012737 000070 000024 MOV #PWRON, a#24 ;PREPARE FOR ANY FUTURE POWER DOWN 
1275 000516 005037 000309 CLR DSPRERR 
1276 000522 005037 000314 CLR a TYPCNT 
1277 000526 012700 000114 MoV #114,R0 ;PREPARE TO SETUP PARITY TRAP VECTOR 
1278 000532 012710 005462 MOV #PARERR-. -6, (RO 
1279 000536 060720 ADD PC, (RO)+ ;TO PARERR 
1280 000540 012710 o00340 MOV #340, (RO) ;AND PSW OF 340 
1281 000544 105737 o00405 TSTB ss REL ; 1S THIS CODE RELOCATED? 
1282 00550 100002 BPL ONEPAS ; BRANCH IF NO 
1283 000552 000167 000546 JMP TSTREL ; THIS CODE 1S RELOCATED SO GET TEST SIZE. 
1285 000556 005737 000406 ONEPAS: TST aeSPASS ; 1S THIS THE FIRST PASS? 
1286 000562 901402 BEQ TSTRP ;BRANCH IF YES (TEST TRAP CATCHER ADDRESSES) 
1287 000564 000167 oD0400 JMP SETSTK ; GET THE TEST SIZE 
1288 000570 012704 007744 TSTRP: MOV #ENDPRG .R4 ;LOAD R4Y WITH THE ADDRESS OF THE END OF THE PROGRAM 
1289 000574 012700 000377 MOV #377,R0 
1290 000600 010037 O00316 MOV RO, d#BAKPAT 
1291 000604 005001 CLR R1 
1292 000606 012124 25: MoV (R14, (RY) + ; SAVE FROM 0000 TO BEGIN-30 AT END OF PROGRAM FOR NOW 
1293 000610 020127 oD0400 CMP R1, #SMAIL 
1294 000614 103774 BLO 2$ 
1295 000616 005741 3S: TST -(R1) ;PREPARE TO TEST THE TRAP VECTORS 
1296 000620 010011 4S: MoV RO, (R1) ;CHECK THE TRAP VECTORS FOR THE CAPABILITY 
1297 ;OF HOLDING O'S & 1°S 
1298 000622 020011 CMP RO, (R1) ; 1S THE DATA OK? 
1299 000624 0601403 BEQ 6$ ;BRANCH IF YES 
1 
1301 000626 004767 005310 JSR PC, FATERR ; KERRORK REPORT ERROR MESSAGE AND HALT AT FATHLT 
1302 000632 000001 1 OOOOKKERROR NUMBER 1000Kx 
1 , 
1304 000634 000300 6S: SWAB =. RO 
1305 000636 001370 BNE 4g 
1306 000640 005701 TST R1 ; 1F WE HAVE NOT REACHED THE LOWEST MEMORY LOCATION 
1307 000642 001365 BNE 35 ; THEN REPEAT FROM 35 
1308 000644 012701 o00400 MoV #SMAIL,R1 
1309 000650 014441 8s. MOV ~(R4), -(R1) ; RESTORE TRAP CATCHER ETC. 
1310 000652 005701 TST R1 
1311 000654 001375 BNE 85 
1312 000656 012700 000006 SETSWR: MOV #o,RO 
1313 000662 012710 000340 Mov #340, (RO) ;SET UP TIME OUT TRAP PSH 
1314 000666 012740 000700 MOV #4, -(RO) ;AND THE RETURN ADDRESS 
1315 000672 005777 177552 25: TST SHR ;DOES THE SWITCH REGISTER POINTED BY SWR EXIST ? 
1316 000676 000404 BR 55 ;BRANCH IF YES 
1317 000700 022626 4S: CMP (SP)+, (SP)+ ;RESTORE THE STACK POINTER 
1318 000702 012737 000176 000450 MOV #SWREG, a#SWR § ;AND PLACE THE ADDRESS OF THE SWITCH REGISTER 
1319 ;DESIGNED FOR THE COMPUTERS NOT HAVING HARDWARE 
1320 ; SWITCH REGISTER AND RUNNING STAND ALONE 
1321 000710 105737 000420 5S: TSTB 3s ARSENY ;RUNNING UNDER APT? 


LS 
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1322 


000714 


001403 
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000716 012737 000422 0O00450 


000724 
000730 
000736 
000744 
000750 


000752 
000756 
000762 
000764 
000766 
000772 


000774 
001000 


001002 
001006 
001012 


001014 
001022 


001024 
001026 
001032 


001034 
001040 


001042 
001044 


001050 
001054 
001056 
001062 


012703 
013737 
013737 
105737 
100021 


012701 
162701 
105711 
001006 
020127 
101371 


004767 
000002 


004767 
004767 
000450 


032777 
001044 


010401 
012710 
011111 


062701 
000774 


022626 
004767 


105737 
001416 
012710 
012701 


000340 
000330 
000332 
000421 


000451 
000004 


0004 31 


005142 


006306 
006302 


000100 


001042 


000002 


005774 
000276 


001070 
020000 


000334 
000336 


177426 


12:37 PAGE 26 
BEGIN OF AREA TESTED (+20) WHEN PROGRAM RELOCATES. 


BEQ 
MOV 


APTSIZ 


N 2 


#SSWREG, dFSHR 


+BRANCH IF NO 
;SET SWR EQUAL TO APT SWITCH REGISTER. 


*APTSIZ- THIS ROUTINE WILL SEARCH THE APT MEMORY ETABLE AND WHEN 
+A NON ZERO TYPE IS FOUND WILL SETUP TO TEST TO GIVEN HIGH ADDRESS. 


; FLOW: 


4 


: NOTE; 


APTS12: 


1%. 


23: 


BRTPS2Z: 


TRYSR: 


SLFS12: 


2$: 


4S: 


6$: 


IF APT DEFINES SIZE THE LOW TEST ADDRESS MUST=00000. (DUE TO ETABLE FORMAT) 
IF BLOCK 4 5 Eaken af TYPE NON ZERO THEN GET APT HIGH ADDRESS AND EXIT. 
1S IGNORED SINCE ALL TESTS ARE RUN REGARDLESS OF MEMORY TYPE. 


MOV 


SEND E 


ELSE 
THE MEMORY TYPE 


#MAXMEM, RS 


d#H|GHTWO, d#SHIMAX 
d#H | GHADD. d# SMAXM 
a# SENVM 


TRYSR 


ROMTYP4+4, R1 


#4,R1 
(R1) 


2$ 
R1,#SNTYP1 
1% 


PC, FATERR 


PC, GETADR 
PC, GETADR 


TYPS1IZ 


#100, dSWR 


TYPSIZ 


R4,R1 


#4$, (RO) 
(R1), (R1) 


#2,R1 
23 


(SP )+, (SP)+ 
PC, MEMMNG 


ae MMNAVA 


12% 


#8%, (RO) 
#20000, R1 


+POINT R3 TO MAXMEM. 

+1N CASE NO SELF SIZING DONE. 
IN CASE NO SELF SIZING DONE. 
+DOES APT ALLOW SELF SIZING? 

+BRANCH IF YES 


+POINT R1 TO BLOCK TYPE 4(+4) 
*POINT R1 TO NEXT BLOCK TYPE. 

+1S THE BLOCK TYPE NON ZERO? 
*+BRANCH IF YES (MEMORY EXISTS) 
*ALL APT BLOCK TYPES BEEN CHECKED? 
*BRANCH IF NO 


;XERRORK REPORT ERROR MESSAGE AND HALT AT FATHLT 


+ XXXXXXERROR NUMBER Z2XXXXxXx 


+GO SET MAXIMUM APT ADDRESS INTO SMAXM + SHIMAX 
*GO SET MAXIMUM APT ADDRESS INTO HIGHADD+HIGHTWO 


+ TYPE THE SIZE OF MEMORY UNDER TEST 


*USER DEFINED MEMORY TEST BOUNDARIES?? 
*BRANCH IF YES (DON'T SIZE MEMORY) 


*SETUP R1 AND R4Y TO THE LOWEST ADDRESS OF MEMORY 
+SET UP RETURN ADDRESS FROM TIME OUT TRAP TO 4S 


SEQ 0026 


+WRITE A MEMORY LOCATION INTO ITSELF AND TRAP IF NONEXIS 


*ADD 2 TO THE ADDRESS POINTER 
*KEEP ON SIZING UP THE MEMORY UNTIL 
+NXM TRAP (TIME OUT TRAP) 1S ENCOUNTER 


*RESTORE THE STACK POINTER 


+ SERVICE MEMORY MANAGEMENT IF IT 1S AVAILABLE 


*AND IF IT HAS TO BE TESTED 
+SEE IF MEMORY MANAGEMENT HAS TO BE TE 
> 1F NO MEM. MANG. THEN GO TO 12% 


ED 


STED 


*SET UP THE RETURN ADDRESS FROM TRAP TO 8% 


*BEGIN CHECKING MEMORY ABOVE 28K 
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1433 


001066 
001070 
001072 


001076 
001100 
001104 
001110 
001112 


001114 


001120 
001122 


001126 
001130 
001132 
001134 
001140 


001142 
001146 
001152 
001156 
001162 


001164 
001170 
001174 


001200 
001202 


001206 
001210 
001212 
001216 
001220 
001222 
001224 
001232 
001234 
001236 
001240 
001242 


001246 
001252 
001254 


000761 
022626 
022701 


001005 
013702 
004767 
000762 
024341 


004767 


024343 
004767 


005743 
00504 3 
005043 
012720 
010403 


012701 
004767 
004767 
004767 
00G055 


004767 
012703 
004767 


010401 
062704 


005302 
002374 
010437 
005021 
020104 
101775 
012737 
005723 
001004 
021300 
103002 
011363 


004767 
005723 
011305 
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160000 


172352 
005740 


006104 


006076 


000104 


000324 
005400 
005546 
OOF 302 


005534 
000330 
006130 


000022 


000310 


157776 


000002 


006136 


000340 


83: 


12%: 


TYPS1 2: 


TYPMEM: 


SETSTK. 


4S: 


6S: 


SAVLOR: 


12:37 PAGE 27 
BEGIN OF AREA TESTED (+20) WHEN 


B 3 


2$ 
(SP )+, (SP)+ 
#160000, R1 


12% 
0#172352,R2 
PC, MMREG 


6% 
-(R3), -(R1) 
PC, PUTADR 


-(R3),- R32) 
PC, PUTADR 


-(R3) 
-(R3) 
-(R3) 
#BUSER, (RO)+ 
RY,R3 


PROGRAM RELOCATES. SEQ 0027 


;RESTORE STACK POINTER 
;1F R1 DID NOT READ ALL THE LOCATIONS POINTED BY 
;PAGE ADDRESS REGISTER 6 THEN IT HAS REACHED THE 
;MAXIMUM AVAILABLE MEMORY 
+1N WHICH CASE GO TO 12$ 
;PREPARE TO UPDATE MEMORY MANAGEMENT REGISTERS 

+ OTHERWISE GO TO UPDATE MEM. MANG. REGISTERS 


; CAUSE R3 TO POINT TO LOCATION SMAXM AND R1 

;TO THE MAXIMUM AVAILABLE MEMORY 

;GO TO THE SUBROUTINE TO PLACE THE ADDRESS IN Rt 
;AT LOCATIONS SMAXM AND SHIMAX 

;MAKE R3 POINT TO HIGHADD 

;PLACE THE ADDRESS IN R1 AT LOCATIONS HIGHADD 
;AND HIGHTWO 


;CLEAR THE LOCATION LOWADD 

;AND LOWTWO 

;SET UP VECTOR FOR ANY FUTURE TRAP 

;SET R3 TO POINT TO THE LOWEST AVAILABLE MEMORY 
; LOCATION 


#LOWTWO, R1 
PC, PCRLF + TYPE CR/LF 
PC, OCTTYP > TYPE LOW TEST ADDRESSE (LOWTWO+LOWADD) 
PC, STYPE , 7. 
f= 
PC, OCTTYP > TYPE HIGHEST TEST ADDRESS (HIGHTWO+H!IGHADD) 
RHIGHTWO, RS ;MAKE R3 POINT TO THE HIGH ORDER BITS OF TOP ADDRESS 
PC, $GTSIZ ; GET THE BITS 13-17 OF THE TOP ADDRESS 
*PLACED IN BITS O-4 OF RZ | 
R4Y,R1 *SET R1 TO LOWEST TEST ADDRESS 
#18. ,R4 ;APPEND THE ERROR STACK FOR THE MEMORY UNDER 
>TEST TO THE END OF THE PROGRAM 
us 
y 
R4Y, dRENDSTK SAVE THE ADDRESS OF THE END OF THE ERROR STACK 
(R1)+ *CLEAR THE ERROR STACK 
R1,R4 
6% 
#157776, d#MAXMEM >SET MAXMEM TO MAXIMUM VIRTUAL ADDRESS 
(R3)+ > TESTING MEMORY MANAGEMENT? 
SAVLOR BRANCH IF YES (GO SAVE LOADERS AT TOP OF VIRTUAL MEMORY 
(R3),RO + 1S THE VIRTUAL ADDRESS ABOVE 157776? 
SAVLOR *>BRANCH IF YES (GO SAVE LOADERS) 
(R3), 2(R3) ; OTHERWISE MAKE THE CONTENTS OF LOCATION MAXMEM 
>EQUAL TO THE MAXIMUM AVAILABLE MEMORY 
;AND FALL INTO SAVE LOADERS. 
PC, CLRMM + DISABLE THE MEMORY MANAGEMENT UNIT 
(R3)+ ;MAKE R3 TO POINT TO THE LOCATION MAXMENM 
(R3),R5 *+RS CONTAINS THE ADDRESS OF MAXIMUM AVAILABLE MEM. 


;1F ONLY 4K BEING TESTED DON'T SAVE LOADERS 
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1434 
1435 
1436 
1437 
1438 
1439 
1440 
1441 
1442 
1443 
1444 
1445 
1446 
1447 
1448 
1449 
1450 
1451 
1452 
1453 
1454 
1455 
1456 
1457 
1458 
1459 
1460 
1461 
1462 
1463 
1464 
1465 
1466 
1467 
1468 
1469 


1470 


1471 
1472 
1473 
1474 
1475 
1476 
1477 
1478 
1479 
1480 
1481 
1482 
1483 
1484 
1485 
1486 
1487 
1488 
1489 


001256 
001262 


001264 
001270 
001274 
001276 
001304 
001306 
001312 
001314 
001316 
001320 
001322 


001324 
001330 
001334 
001336 
001342 


001344 
001346 


001352 
001354 
001362 
001364 
001370 


001372 
001376 
001400 
001402 
001406 
06:410 
001412 


001414 
001416 
001426 
001424 
001426 
001432 
001436 
001440 


001444 
001446 
001450 
001454 


001456 
001462 
001464 


020527 
103416 


162705 
005737 
001406 
023737 
001402 
162705 
012524 
020513 
101775 
012323 
010423 


010537 
004767 
005745 
012703 
005723 


001003 
021327 


103411 
032777 
001003 
004767 
000003 


000167 
020423 
103002 
016304 
005723 
001003 
021305 


101001 
011305 
105737 
100014 
013704 
020527 
103402 
012705 


020405 
103403 
004767 
000004 


012703 
011343 
062713 
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017776 


000276 
000042 
000042 


005674 


000346 
006054 


000324 


157776 


010u00 
004552 


003526 


177776 


000405 


000322 
017776 


017776 


004466 


000342 
000002 


000046 


177066 
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BEGIN OF AREA TESTED (+20) WHEN 


35: SUB 


23: MOV 
4S: MOV 
TSTREL: 


TSTSI2: 
1$: MOV 


25: BIT 


33: JMP 
4S: CMP 


6S: TST 


8$: TSTB 


MOV 


10%: 
MOV 
MENTST: ADD 


C 


RS, #17776 
4% 


#276,R5 
#42 


2$ 
#42, DE46 
2$ 


#41502. K2>,R5 
(R5)+, (RY)+ 
RS, (R3) 

23 

(R3)+, (R3)+ 
R4, (R3)+ 


RS, d#SAVRS 
PC, CLRMM 
-(R5) 
#LOWTHWO,R3 
(R3)+ 


2% 
(R3),#157776 


4% 

# 10000, dSWR 
3% 

PC, FATERR 


TSTMM 

R4, (R3)+ 
65 
-~2Z2(R3),R4 
(R3)+ 


8% 
(R3),R5 


O#RELBOT, RY 
RS, #17776 


9% 
#17776,R5 


R4Y,R5 
10% 
PC, FATERR 


er SAVMAX, RS 
#2, (R3) 





SEQ 0028 


PROGRAM RELOCATES. 


;ONLY TESTING 4K MAX? 
;BRANCH IF YES (DON'T SAVE LOADERS) 


;PREPARE TO SAVE 300 BYTES OF THE LOADERS 

+ 1S THE PROGRAM RUNNING UNDER ACT OR XXOP ? 
+ 1F NOT THEN GO TO 2% 

+ARE WE RUNNING UNDER XXDP CHAIN MODE? 
*+BRANCH IF NO 

*SAVE 1500. WORDS FOR XXDP CHAIN MODE 

+ SAVE LOADER 


;SAVE THE CONTENTS OF LOCATION MAXMEM IN SAVMAX 
;AND THE CONTENTS OF RY AT SAVRY 


+SAVE HIGHEST VIRTUAL ADDRESS+2 

>GO TO DISABL© MEMORY MANAGEMENT UNIT 

;SET RS BACK TO HIGHEST VIRTUAL ADDRESS 

;PREPARE TO LOAD R4Y AND RS WITH THE MEMORY BOUNDRIES 
>1F THE BITS 16,17 OF THE LOWEST LOCATION UNDER 

> TEST ARE NON ZERO 

> THEN GO TO 2% 

;1F THE LOWEST LOCATION UNDER TES: |S HIGHER THAN 
157776 THEN GO TO TEST MEMORY MANAGEMENT 


+ 1S MEMORY MANAGEMENT SELECTED? 

*YES ALL IS WELL 

;XERRORK REPORT ERROR MESSAGE AND HALT AT FATHLT 
> KXXXXXXERROR NUMBER SXXXXXx 


>GO TO TEST MEMORY MANAGEMENT © 


;ADJUST RY TO POINT TO THE LOWEST LOCATION UNDER TEST 
;1F BITS 16-17 OF HIGHEST LOCATION [fO BE TESTED 
;ARE NON ZERO THEN GO TO 8% 

; OTHERWISE SEE IF THE HIGHEST LOCATION TO BE 

; TESTED 1S HIGHER THAN 157776 

;1F SO THEN GO TO 8% 

;MODIFY RS 

;ARE WE RELOCATED. ? 

;BRANCH IF NO 

;SET BOTTOM TEST ADDRESS WHEN RELOCATED. 

;ARE WE RELOCATED IN BANK 0? 

;BRANCH IF YES 

;ELSE SET HIGH MEMORY UNDER TEST=4K 


>1S LOW LIMIT LOWER THAN HIGH LIMIT? 

*BRANCH IF YES 

> KERRORX REPORT ERROR MESSAGE AND HALT AT FATHLT 
> XXXXXXERROR NUMBER 4YXX4X4X 


;RESTORE THE CONTENTS OF MAXMEM 
;MAKE THE CONTENTS OF MAXMEM = MAXIMUM AVAILABLE 


dD 3 
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1490 ;MEMORY +2 
wae 001470 005725 TST (R5)+ ;AND SET RS=MAX MENORY+2 
oe >CLEAR MEMORY UNDER TEST 
4 
1455 001472 010500 CLRMEM: MOV R5,RO ;MOVE HIGH ADDRESS TO RO 
1496 001474 QO05040 23: CLR - (RO) ;BEGIN CLEARING THE MEMORY FROM THE TOP 
1497 001476 020004 CMP RO. RY ; UNTIL THE BOTTOM IS REACHED 
1498 001500 101375 BHI 2$ 
1499 001©&32 012702 O00001 MOV #1,R2 ;SET R2 TO ENABLE PARITY MODULE CODE. 
1500 51506 004767 005776 JSR PC, PARITY ; ENABLE PARITY IF WANTED AND AVAILABLE. 
165i 001512 012702 000316 MOV #BAKPAT, RZ 
1502 001516 012212 MOV (RZ) +, (RZ) ;WRITE SWAPPED BAKPAT IN LOCATION SWAPAT 
1503 001520 000312 SWAB (RZ) 
1504 001522 017702 176722 MOV ASWR, RZ ;LOAD R2 WITH THE OPTIONS STORED AT SSWREG 
1505 001526 042702 177760 BIC #177760,R2 ; ONLY LEAVE THE LOWER 4 BITS OF SSWREG IN R2 TO GO TO 
doe ; THE TEST & SPECIFIED DEFAULT IS TEST#O 
156 
1508 
1509 
mat ; ENTER HERE FROM TSTSCP ROUT'NE AT END OF SUBTEST 
1511 
1512 001532 005037 O00306 CONT: CLR ak PASFLG ; INIT SUBTEST PASS FLAG. 
1513 001536 110237 O00404 MOVB R2, @d#STESTN ;SET UP STESTN WITH THE TEST NUMBER GOING 
1514 ;TO BE EXECUTED 
1515 001542 010401 LOOP: MOV R4,R1 ;LOAD R1 WITH THE LOWEST LOCATION UNDER TEST 
1516 001544 010246 MOV R2,.-(SP) ; SAVE R2 ON THE STACK 
1517 001546 012703 000376 Mav #376,R3 ;POINT R3 TO SCRATCH STACK 
1518 001552 004767 O0544o6 JSR PC, PUTADR ;GO TO GENERATE 18 BIT ADDRESS OUT OF THE ADDRESS 
1519 ;STORED IN R1 AND STORE IT IN LOCATIONS (R3) 
1520 ;AND (R3-2) 
1521 001556 005743 TST -(R3) ; CAUSE R3 TO POINT TO THE HIGH ORDER BITS OF THE 
1522 ;18 BIT ADDRESS 
+e 001560 004767 005544 JSPR PC, $GTSIZ ot a Ag 13-17 OF THE ADDRESS IN BITS 
1524 | ;0-4 
1625 0015.4 010400 MOV R4,RO ;PLACE THE ADDRESS OF THE LOWEST LOCATION UNDER 
1526 > TEST IN RO 
1527 001566 010401 MOV R4,R1 ; IN RI 
15628 001570 010403 MOV R4Y,R3 ;AND IN RZ 
1529 001572 012602 MOV (SP)+,RZ >RESTORE R2 
1530 001574 006302 QSL R2 
1531 001576 060702 ADD PC,R2Z 
1532 001600 066297 9000004 ADD TBL-. (R2),PC ;GO TO THE TEST & 
1533 ;STORED IN BITS O-3 OF SWITCH REGISTER 
1534 
1535 
1536 001604 000102 TBL: TSTO-TBL ;RELATIVE ADDRESS OF TEST &# O 
1537 001606 O00334 TST1-TBL ;RELATIVE ADDRESS OF TEST & 1 
1538 001610 O004%34 TST2-TBL ;RELATIVE ADDRESS OF TEST & 2 
1539 001612 000544 TST3-TBL ;RELATIVE ADDRESS OF TEST & 3 
1540 001614 001012 TST4-TEL ;RELATIVE ADDRESS OF TEST & 4 
1541 001616 001122 TST5-TBL ;RELATIVE ADDRESS OF TEST & 5 
1542 001620 001270 TST6-TBL ;RELATIVE ADDRESS OF TEST & 6 
1543 001622 001424 TST7-TBL ;RELATIVE ADDRESS OF TEST & 7 
1544 001624 001646 TST10-TBL ;RELATIVE ADDRESS OF TEST & 10 
1564S 001626 002174 TST11-TBL ;RELATIVE ADDRESS OF TEST &@& 11 


. t ¢ 
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DZKMAD. P11 15-AUG-77 12: 36 BEGIN OF AREA TESTED (+20) WHEN PROGRAM RELOCATES. SEQ 0030 
1546 001630 002246 TST12-TBL ;RELATIVE ADDRESS OF TEST # 12 
1547 001632 002520 TST13-TBL *;RELATIVE ADDRESS OF TEST # 13 
ine 001634 003146 RELOC-TBL RELATIVE ADDRESS OF ROUTINE ‘RELOC' 
154 
1550 
1551 
1552 *-RS 1S POINTING TO THE TOP OF THE MEMORY TO BE TESTED+2 


1553 >;R4Y & RO ARE POINTING TO THE LOWEST ADDRESS OF MEMORY TO BE TESTED 


DZKNA 
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1554 
1555 
1556 
1557 
1558 
1559 
1560 
1561 
1562 
1563 
1564 
1565 
1566 
1567 
1568 
1569 
1570 
1571 
1572 
1573 
1574 
1575 
1576 
1577 
1578 
1579 
1580 
1581 


001636 
001642 
001644 


001650 


001654 
001660 
001666 
001670 


001672 
001700 
001702 
001704 


10&73? 
001002 
004767 


113702 


005237 
C32777 
001401 
000000 


032777 
001320 
105202 
000712 
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0004 20 
006020 
000404 


000410 
002000 


040000 


176562 


176550 


;x 


Ge Sa We Nas So 


Pt DE PE DE DE FE PE FE FE 


TSTSCP: 


CNTSCP: 


SWHAL T: 
TSTGO: 


12:37 PAGE 31 
SCOPE ROUTINE 


SCOPE ROUTINE 


TSTB 
BNE 
JSR 
MOVB 


INC 
BiT 
BEQ 
HALT 


BIT 
BNE 
INCE 
BF 


me ee ee 


PROGRAM COMES TO THIS ROUTINE AFTER COMPLETION OF EACH TEST AND 
IF CNTRL-C TYPED GOTO ERROR HISTORY TYPE ROUTINE. 

IF SR= 2000 (B1T10) THEN HALT 

IF SR= 40000 (81714) THEN LOOP ON TEST DEFINED BY SR BITS<3: 0D 
ELSE CONTINUE TO NEXT TEST. 


DESENY 
CNTSCP 
PC, CHECKC 


a#STESTN, RZ 


a SDEVCT 
#2000, daSWR 
TSTGO 


#40000, dSWR 


;ARE WE RUNNING UNDER APT? 

; 1F SO THEN GO TO CNTSCP 

; TEST FOR CONTROL-C AND IF TYPED GO 

;PRINT ERROR HISTORY AND HALT AT FATHLT. 

;PLACE THE TEST NUMBER IN THE LOWER BYTE OF R2 
;SINCE THERE ARE LESS THAN 377 TESTS UPPER BYTE 
;OF R2 WILL BE O 

; TELL APT WE ARE STILL RUNNING OKAY 

; 1S THE PROGRAM GOING TO HALT AFTER EACH TEST? 
;1F NOT THEN GO TO 25 

;HALT AT END OF TEST SWITCH SET. 


> 1S THE PROGRAM GOING TO LOOP ON TEST 
> 1F SO THEN GO TO THE STARTING OF THE SAME TEST 


;GO TO CONT AND CONTINUE EXECUTING THE NEXT TEST 


SEQ 001 


a me naa ee ae aa re eae ee 


DZKMA 
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1582 
1583 
1584 
1585 
1586 
1587 
1588 
1589 
1590 
1591 
1592 
1593 
1594 
1595 
1596 
1597 
1598 
1599 
1600 
1601 
1602 
1603 
1604 
1605 
1606 
1607 
1608 
1609 
1610 
1611 
1612 
1613 
1614 
1615 
1616 
1617 
1618 
1619 
1629 
1621 
1622 
1623 
1624 
1625 
1626 
1627 
1628 
1629 
1630 
1631 
1632 
1633 
1634 
1635 
1636 
1637 


001706 
001712 
001714 
001720 


001722 
001726 
001730 
001732 
001734 
001736 
001740 
001742 


001744 
001746 


001754 
001756 
001756 


001764 
001766 
001772 
001774 
001776 
002000 


002006 
002010 
002012 
002016 
002020 
002022 
002026 
002032 
002034 


002036 


10&73?7 
001403 
004767 
000005 


012703 
010401 
010310 
020001 
001417 
005711 
001430 
020311 


001004 
012767 


000403 
012767 


010046 
105237 
000407 
020311 
001411 
012767 


010046 
010390 
004767 
000000 
012600 
013706 
062701 
020105 
103736 


105737 
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000404 
004222 


177777 


000006 


000007 


000301 


000010 


003566 


000350 


020000 


000421 


N00042 


N00032 


000010 


12:37 PAGE 32 
TO TEST FOR PROPER BANK SELECTION 


ee ee eee Se 


G 3 
SEQ 0032 


+s AXKKKKAAAAAAAAAA AAA AAA AAA AAA AAA AAA AA AAA AAA AAA AAA AAA AAAS 


*+KTEST O TEST FOR PROPER BANK SELECTION 
**(1) THIS TEST ASSUMES THAT THE MEMORY IS IN A STATE 
; OF ALL O'S AND RO HAS THE ADDRESS OF THE LOWEST 
re LOCATION UNDER TEST 
>*(2) \T CHECKS FOR PROPER BANK SELECTION BY WRITING 
;x 1'S IN A LOCATION AND CHECKING FOR O'S IN THE SAME 
;x LOCATIONS OF OTHER 4K BANKS OF THE MEMORY 
> 1.€. LOCATIONS LIKE 7766 AND 27766 ETC. 
>*(3) THIS TEST ALSO CHECKS TO SEE THAT NONE OF THE NON EXIST- 
;x ING BANK RESPOND WHEN THEY ARE ADDRESSED 
QO OOOO 
1ST0. td, ee ;CHECK FOR PROPER TEST SEQUENCE 
+1 
JSR PC, SEQERR ;XERRORKX REPORT ERROR MESSAGE AND HALT AT FATHLT 
5 ; XXXXXXERROR NUMBER SXXXxx%% 
MOV #177777,R3 , 
1: MOV R4Y,R1 ;R1 = ADDRESS OF LOWEST LOCATION OF MEMORY UNDER TEST 
MOV R3, (RO) *SET ALL THE BITS AT (RO) 
23: CrP RO, R1 ;1S RO POINTING TO THE SAME MEMORY LOCATION AS R1 
BEQ 4% > IN WHICH CASE CHECK FOR ALL 1°‘S AT (R1) 
43 ee ; OTHERWISE CHECK (R1) FOR ALL O'S 
B 
CMP R3, (R1) > 1F R1 1S NOT EQUAL TO RO AND (R1) 
;DOES NOT CONTAIN ALL O'S THEN 
; CHECK TO SEE IF (RO) = (R1) 
BNE 3$ 
MOY #6,129 »>XERPORX SETUP ERROR NO. IN 12% 
; KXXXXKKXERROR NUMBER #OXXXKXX 
- BR 10% 
MOV #7,129% ;XERRORX SETUP ERROR NO. IN 12% 
> XXSXKXKERROR NUMBER #7XX4KK4% 
10%: MOV RO, -(SP) SAVE RO ON STACK 
‘ae 4+ iene >AN ADDRESSING ERROR 1S SUSPECTED 
B 11 
4S: CMP RZ, (R1) ;CHECK (R1) FOR ALL 1°S 
BEQ 5% 
MOV *#10,12% ;XERRORX SETUP ERROR NO. IN 12% 
; XXXKXXKERROR NUMBER #10K4444% 
MoV RO,-(SP) SAVE RO ON STACK 
MOV R3,RO 
113: JSR PC, ERROR >GO TO THE ERROR SUBROUTINE 
12%: WORD ;ERROR NUMBER TO BE REPORTED WILL BE PLACED HERE 
MOV (SP)+,R0 >RESTORE RO 
53: MOV a# SAVRE, SP ;RESTORE THE STACK POINTER 
ADD #20000. R1 ;CAUSE P1 TO POINT TO THE SAME CHIP 
>LOCATION IN THE NEXT 4K BANK OF MEMORY 
>BY ADDING 1 TO THE 14TH BIT OF ADDRESS IN R1 
CMP Ri,R5 >COMPARE R1 WITH THE HIGHEST MEMORY 
>LOCATION WHICH 1S STORED IN R5 
BLO 2$ » IF R1 LESS THAN RS THEN REPEAT THE TEST FROM 2$ 
TSTB ae SENUM »>HAS APT INHIBITED SIZING? 


a eel 


OZKNA 
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1638 
1639 
1640 
1641 
1642 
1643 
1644 
1645 
1646 
1647 
1648 
16049 
1650 
1651 
1652 
1653 
1654 
1655 
1656 
1657 
1658 
1659 
1660 
1661 
1662 
1663 
1664 
1665 
1666 
1667 
1668 


002042 
002044 
002052 


002054 


002060 
002062 
002066 
002072 
002076 
002100 
002104 
002106 
002110 
002114 


002116 
002122 
002124 


002132 


002134 
002136 


1004 36 
032777 
001024 


020137 


103760 
012702 
012712 
012742 
060712 
020127 
101004 
O11111 
004767 
000011 


Q12722 
005012 
C05010 


062700 


020005 


103674 
000637 
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000100 


000340 


000006 
000340 
177722 
157776 


004026 


O00006 


020000 


176376 


12: 37 PAGE 
TO 


6%: 


END: 


33 


TEST FOR PROPER BANK SELECTION 


8$ 
#100, dSWR 
8$ 


Ri, d#MAXMEN 


5% 
#6,R2Z 


#340, (R2) 
#5$-. -6, -(R2) 
PC, (R2) 
R1,#157776 
6$ 


C(R1), (RI) 
PC, FATERR 


#6, (R2Z)+ 


(RZ) 
(RO) 


#20000. R0 


RO. RS 


1$ 
TSTSCP 


SEQ 0033 


;BRANCH IF YES (DON'T TEST NON-EXISTENT MEMORY) 
+HAS USER INHIBITED SIZING? 
;BRANCH IF YES (DON'T TEST NON-EXISTENT MEMORY) 


> 1S R1 LOWER THAN THE MAXIMUM AVAILABLE 
;MEMORY ? 


+ 1F SO THEN GO TO 5$ 

;MAKE R2 POINT TO TRAP VECTOR+2 FOR NXM 
*SET PSW TO 346 

;SET UP RETURN ADDRESS FROM TRAP TO 5% 


;SEE IF R1 HAS CROSSED 28K BOUNDRY OF VIRTUAL ADDRESS 
> IN WHICH CASE GO TO 6% 

> TRY TO WRITE TO NON-EXISTENT MEMORY (SHOULD TRAP) 

> KERRORX REPORT ERROR MESSAGE AND HALT AT FATHLT 
/XXXHKKXERROR NUMBER 114444" 


>RESTORE TRAP VECTOR 


» CAUSE RO TO POINT TO THE SAME CHIP 

;LOCATION IN THE NEXT 4K MEMORY BANK 

>-BY ADDING 1 TO THE 14TH BIT OF ADDRESS IN RO 
; COMPARE RO WITH THE HIGHEST MEMORY 

;LOCATION WHICH iS STORED IN R5. 

»1F RG LESS THEN REPEAT THE TEST 


—— ore ee oe 


DZ iA 


MACY11 30°1046) 


UZENED. Pi} 


1669 
1670 
1671 
1672 
1673 
1674 
1675 
1676 
1677 
1678 
1679 
1680 
1681 
1682 
1683 
1684 
1685 
1686 
1687 
1688 
1689 
1690 
1691 
1692 
1693 
1694 
1695 
1696 
1697 
1698 
1699 
1700 
1701 
1702 
1703 
1704 
1705 
1706 
1707 
1708 
1709 


002140 


002146 
002150 
002154 


002156 
002162 
002164 
002166 
002170 
002172 
002176 


002200 
002202 
002204 


002206 


002210 
002212 
002216 


002220 
002222 
002224 


002226 
002232 


002234 
002236 


15-AUG-77 


12273? 


001403 
004767 
000012 


012700 
010002 
010011 
020011 
001403 
004767 
000013 


005702 
001406 
006300 


103366 


005002 
012700 
000762 


000261 
006100 
103757 


062701 
020105 


103750 
000737 


i2: 


000001 


003765 


000001 


O0340e 


N20000 


15-AUG- 77 
6 


000404 


12: * PAGE 


+s MXKXKKAKKKAAA AAA AA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA EES 
;KTEST CHECK Di/00 LINES 

THIS TEST CHECKS THE DATI/DATO LINES BY SHIFTING 
;% A 1 IN THE WORD DIRECTION 
;ASASURESSOSAANANAESSEEESEESAANESAAESESEDEDOOAAAATELESSSESESE 
MP 


1ST1 


1$: 


2$: 
3%: 


4% 


53. 


END 1: 


34 
CHECK DI/00 LINES 


>¥(1) 


BEQ 
JSR 
12 


MOV 
MOV 
MOV 
CMP 
BEQ 
JSR 
13 


TST 
BEQ 
ASL 


BCC 


#1, ad8STESTN 
+10 

PC, SEQERR 
#1,R0 

RO.RZ 

RO, (R1) 

RQ. (R1) 

4% 

PC, ERROR 


A 
sf 


#177776.R0 
25 


RO 
2$ 


#20000. F 1 
R1,R5 

1% 

ENDO 


3 


;CHECK FOR PROPER TEST SEQUENCE 


;KERRORK REPORT ERROR MESSAGE AND HALT AT FATHLT 
; XXXKKXKERROR NUMBER 124444%% 


; SET R2=1 
;MOV 1 AT LOCATION (R1) 
; COMPARE R1 WITH THE CONTENTS OF LOCATION (R1) 


; XERRORK REPORT ERROR MESSAGE 
> AXXEXKERROR NUMBER 13X44%%% 


;ARE WE SHIFTING A 0 IN DATA DIRECTION? 

> 1F SO THEN GO TO 5% 

»SHIFT THE 1 BROUGHT IN AT 1% IN 

>DATA DIRECTION 

:1F THE 1 HAS NOT BEEN SHIFTED THRU 

>THE 16 DATA BITS THEN REPEAT FROM 29% 

> INITIATE SHIFTING OF 0 IN DATA DIRECTION 


>SET C BIT 

;SHIFT AO 16 TIMES IN DATA DIRECTION 
,»1F THE 0 HAS NOT BEEN SHIFTED THRU 
>THE 16 DATA BITS THEN REPEA: FROM 2$ 
;OTHERWISE GO TO THE NEXT BANK OF 

>4K MEMORY AND REPEAT THE TEST 


SEQ 0034 — 


DZKNA 
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1710 
1711 
1712 
1713 
1714 
1715 
1716 
1717 
1718 
1719 
1720 
17Z1 
1722 
1723 
1724 
1725 
1726 
1727 
1728 
1729 
1730 
1731 
1732 
1733 
1734 
1735 
1736 
1737 
1738 
1739 
1740 
1741 
1742 
1743 
1744 
1745 
1746 
1747 
1748 
1749 
1750 
1751 


GO2240 


002246 
002250 
002254 


002256 
002262 
002264 
002270 
602272 


002274 


002276 
002300 
002304 
002310 
002312 
002314 
002316 
002322 
002326 
002332 


002334 
002336 
002340 
002344 


002346 


122737 


001403 
004767 
000014 


013700 
110021 
113721 
020105 
103771 


C2004 1 


001416 
062701 
123741 
001402 
120041 
001002 
105237 
042701 
004767 
000015 


020104 
101356 
000337 
001744 


000733 
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12: 


000002 000404 


003666 


000316 
00031? 


000002 


000317 


000301 
000001 
003252 


000316 


37 PAGE 
T2 


35 
TEST MEMORY FOR HOLDING DATA AND BYTE SELECTION 


a a a ee ae 


J 3 
SEQ 0035 


++ MXXEXAAAAAAAAAA KAA AAA AAR AAA AAA AAA AAA AA AAA AAA AAA AAA AAAS 


>KTEST 2 


+x(3) 


TEST MEMORY FOR HOLDING DATA AND BYTE SELECTION 

THIS TEST CHECKS THE MEMORY FOR THE CAPABILITY 

OF HOLDING 1'S AND O'S BY WRITING A BACKGROUND 

OF BAKPAT AND READING IT 

MEMORY IS WRITTEN USING A BYTE AT A TIME 

STEPS 1 & 2 ARE REPEATED WITH A SWAPPED BACKGROUND PATTERN 


PTT TTT TATE TTT TETET TTT 


TST2: 


1$: 


4S: 
6S: 


8$: 


END2: 


CMPB 


BEQ 
JSR 


BR 


#2, O08STESTN ;CHECK FOR PROPER TEST SEQUENCE 

. +10 

PC, SEQERR ;XERRORX REPORT ERROR MESSAGE AND HALT AT FATHLT 
> XXXXXXERROR NUMBER 14XXXx4xx 

dF BAKPAT, RO 


R1,R5 


1$ 

RQ. -(R1) > TEST THE MEMORY TO SEE IF IT CONTAINS 
>THE WORD STORED IN BAKPAT 

8% 

#2,R1 

@#BAKPAT+1,-(R1); CHECK FOR BYTE SELECTION PROBLEM 

4% 

RO, -(R1) ;AGAIN CHECK FOR BYTE SELECTION PROBLEM 

6$ 

d# SADERR ;PREPARE TO INFORM THAT IT 1S ADDRESSING ERROR 

r1-R1 *MAKE THE ADDRESS IN R1 EVEN 

PC, ERROR ;XERRORX REPORT ERROR MESSAGE 
;XXXXXKXERROR NUMBER 15XX4%%% 

R1,R4 *KEEP ON TESTING THE MEMORY UNTIL 

2% *R1 EQUALS THE LOWEST ADDRESS 

da*# BAKPAT ; CHANGE THE DATA PATTERN 


1% > 1F THE DATA PATTERN DOES NOT HAVE LOW 
> BYTE =O THEN FALL THRU 
END1 


; THE TEST LEAVES BAKPAT LOCATION THE SAME AS IT WAS IN THE BEGINNING 


RO. (R1)+ 
O#BAKPAT+1, (R1)4+;WRITE THE MEMORY WITH THE WORD STORED IN BAKPAT 
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1752 
1753 
1754 
+755 
1756 
175? 
1758 
1759 
1760 
1761 
1762 
1763 
1764 
1765 
1766 
1767 
1768 
1769 
1770 
1771 
1772 
1773 
1774 
1775 
1776 
1777 
1778 
1779 
1780 
1781 
1782 
1783 
1784 
1785 
1786 
1787 
1788 
1789 
1790 
1791 
1792 
1793 
1794 
1795 
1796 
1797 
1798 
1799 
1800 
1801 
1802 
1803 
1804 
1805 
1806 
1807 


002350 
002356 
002360 
002364 


002366 
002370 


002374 
092376 
002400 
002402 
002404 
002406 
002410 


002412 
002414 
002416 
002420 
002422 
002424 
002426 
0024 30 
002432 


0024 34 
0024 36 


002444 
002446 
002450 


002452 


002454 


002462 
002466 
002470 
002472 
002476 
002500 
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122737 O00003 900404 


001403 
004767 
000016 


005003 
004737 


005002 
C50302 
020204 
103465 
020205 
103077 
000312 


005001 
050301 
020104 
103445 
020105 
103053 
020102 
001431 
020011 


001437 
012767 


010046 
000316 
022611 


001003 


012767 


105237 
010046 
010200 
004767 
000000 
012600 


003556 


000120 


000017 


000020 
000301 


003106 


Q00032 


0000!4 


12:37 PAGE 36 
T3 


ee ee eR ee roe 


TST3: 


4S: 
6S: 


7%: 


8s: 


95. 


223: 


K 


DUAL ADDRESS TEST A 


3 


DUAL ADDRESS TEST A 
THIS TEST CHECKS FOR DUAL ADDRESSING PROBLEMS BY WRITING A 


BACK GROUND OF BAKPAT. 

“STARTING FROM THE LOWEST LOCATION !N THE BANK THE TEST WRITES A 
LOCATION WITH SWAPPED BAKPAT 

READS THE MEMORY FOR PROPER CONTENTS 


SHIFTS A 1 ALONG THE ADDRESS DIRECTION AND REPEATS STEPS 1-3 


REPEATS STEP 1 
#3, 0#STESTN 
. +10 

PC, SEQERR 


R3 
PC, d#WRTMEM 


1 
RO, (R1) 


12% 
817, 22% 


RO, - (SP) 
(SP) 
(SP)+, (R1) 


9% 


#20, 22% 


a# SADERR 
RO. - (SP) 
R2,RO 

PC, ERROR 


(SP )+,R0 


5 -4 FOR EACH 4K BANK 
TTT TTT TTT 
;CHECK FOR PROPER TEST SEQUENCE 


;XERRORX REPORT ERROR MESSAGE AND HALT AT FATHLT 


;XXXXXXERROR NUMBER 16XX4%%% 


; WRITE MEMORY WITH THE BACKGROUND STORED 


*AT LOCATION BAKPAT 


>MAKE RZ POINT TO THE MEMORY BANK POINTED BY RS 
;1F RZ 1S LESS THAN R4 

+ THEN DO NOTHING 

> 1F R2 |S HIGHER THAN THE HIGHEST LOCATION TO BE 
> TESTED THEN EXIT THE TEST 


;OTHERWISE WRITE THE COMPLEMENT OF BAKPAT IN 
>THE LOCATION POINTED BY RZ 


> 1F R1 1S POINTING TO A LOCATION LOWER THAN R4 
+ THEN GO TO 12% 


+CHECK THE MEMORY FOR CORRECT DATA 


> 1F R1 1S NOT = 
+ THE SAME WORD AS BAKPAT 


;1N WHICH CASE GO BACK TO 12% 


;XERRORX SETUP ERROR NO. 


IN 22% 


; XXXXXXERROR NUMBER #17XXXX4% 


*PLACE RO ON THE STACK 


> IF (R1) IS NOT = 
>AS A SWAPPED RO 


TO RZ THEN (R1) SHOULD HAVE 


RO THEN SEE IF IT 1S SAME 


> 1F NOT THEN A SUSPECTED DUAL ADDRESSING PROBLEM 
>FOR THE BITS THAT ARE DIFFERENT IN RO AND (R1) 


*OTHERWISE THERE IS DUAL ADDRESSING FOR THE 


*ENTIRE WORD 
+> XERRORA SETUP ERROR NO. 


IN 22% 


;XXXXXXERROR NUMBER #Z20XXX%x% 


; ADDRESSING PROBLEM IS DETECTED 
+;SAVE RO 


+SET RO=GOOD ADDRESS FOR ERROR REPORT 
*GO TO THE ERROR SUBROUTINE 


;ERROR NUMBER TO BE REPORTED WILL BE PLACED HERE 
*RESTORE RO 


ee —— ———— 


SEQ 0036 
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1808 
1809 
1810 
1811 
1812 
1813 
1814 
1815 
1816 
1817 
1818 
1819 
1820 
1821 
1822 
1823 
1824 
1825 
1826 
1827 
1828 
1829 
1830 
1831 
1832 
1833 
1834 
1835 
1836 
1837 
1838 
1839 
1840 
1841 
1842 


1843. 


1844 


002502 
002504 
002510 
002512 
002514 
002516 


002520 
002522 


002530 
002532 
002534 
002536 
002540 
002542 
002544 
002546 
002552 
002554 
002556 


002560 
002562 
002564 
002566 
002570 


002574 
002576 
002600 


002604 
002606 
002612 


002614 


010011 
020037 
001411 
000407 
000300 
020011 


001404 
012767 


000745 
000300 
040301 
005701 
001001 
005201 
006101 
020127 
103720 
000312 
040302 


005702 
001001 
605202 
006102 
020227 


103700 
060203 
020337 


103673 
000337 
001656 


000654 
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000316 


000021 


020000 


020uU00 


000340 


6000316 


177746 


12: 37 PAGE 37 
T3 


10S: 


a 


153: 
163: 


183: 


20%: 


END2: 


L 


DUAL ADDRESS TEST A 


RO, (R1) 
RO, d#BAKPAT 
12% 


11% 
RO 
RO, (R1) 


11$ 
#21, 22% 


R 
R2.#20000 


6% 
R2,R3 
R3, d#MAXMEN 


4% 
a BAKPAT 
TST3 


ENDZ 


<a 


SEQ 0037 


+RESTORE (R1) 
;1F THE CONTROL CAME HERE FROM 15$-2 THEN 


+RETURN TO 119% 

;MAKE RO SAME AS SWAPPED BAKPAT 

+ 1F R1 = RZ THEN (R1) SHOULD CONTAIN A WORD 
*EQUAL TO SWAPPED RO 

+ IN WHICH CASE GO BACK TO 11% 

;+*ERRORX SETUP ERROR NO. IN 22% 
;XXXXXXERROR NUMBER &21444%4% 

+AND GO TO 8S 

*RESTORE RO TO BAKPAT 

; TAKE OUT THE BANK ADDRESS FROM THE ADDRESS IN R1 
> 1F R1 1S O THEN PLACE A 1 IN R1 

*OTHERWISE GO TO 135% 


;1F R1 1S LESS THAN A 4K BOUNDRY 
; THEN REPEAT FROM 7% 

*RESTORE (RZ) TO BAKPAT 

+ TAKE OUT THE BANK ADDRESS FROM THE ADDRESS 
*STORED IN RZ 

> 1F RZ = O THEN MOVE A 1 TO R2 

; OTHERWISE GO TO 18% 


;SHIFT A ONE IN THE ADDRESS WORD 
; 1S THE ADDRESS IN R2 MORE THAN THE BOUNDRY 
; OF UK 
> 1F NOT THEN GO TO 6% 
; OTHERWISE MAKE R3 POINT TO THE NEXT 4K BANK 
;1F R3 1S POINTING TO A BANK THAT 1S LOWER 
; THAN MAXMEM 
+ THEN REPEAT FROM 4% 
;REPEAT THE TEST WITH SWAPPED BAKPAT ONLY IF 
>THE LOWER BYTE OF BAKPAT IS 0 


Nh 3 
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1845 aa 7 Gn, aan ee eee 
1846 **KTEST 4 DUAL ADDRESS TEST B 
1847 +x(1) THIS TEST CHECKS FOR DUAL ADDRESSING BY WRITING 
1848 eS “~ READING THE ADDRESS IN THE LOCATION AND THEN 
1849 re WRITING AND READING ADDRESS COMPLEMENT 
1850 TERETE TTT eee 
1851 002616 122737 Q00004 OQO00404 TST4: CMPB #4, O#STESTN + CHECK FOR PROPER TEST SEQUENCE 
1852 002624 001403 BEQ +10 
1853 002626 004767 003310 JSR PC, SEQERR ;KERRORX REPORT ERROR MESSAGE AND HALT AT FATHLT 
t+ 002632 000022 22 + XXXXXXERROR NUMBER Z244X%x%% 
1856 002634 005003 CLR R3 
1857 002636 010100 1$: MOV R1,R0 
1858 002640 005703 TST R3 ;1F R3 1S NOT O THEN STORE THE ADDRESS 
1859 002642 001401 BEQ 2% + IN THE LOCATION 
1860 002644 005100 COM RO ;OTHERWISE STORE COMPLEMENT 
1861 002646 010021 2$: MOV RO, (R1)+ >OF THE ADDRESS 
1862 002650 020105 CMP R1,R5 ;UNTIL THE HIGHEST MEMORY LOCATION IS REACHED 
tor 002652 103771 BLO 1% 
1 
1865 002654 Cz0041 3$: CMP RO, -(R1) ;CHECK THE LOCATION FOR THE CORRECT CONTENTS 
1866 002656 001405 BEQ 4% 
1867 002660 105237 000301 INCB a*# SADERR >THIS 1S PROBABLY ADDRESS PROBLEM RATHER THAN 
1868 *BIT PROBLEM 
1869 002664 004767 002714 JSR PC, ERROR ; XERRORX REPORT ERROR MESSAGE 
ek, 002670 000023 23 ; XXXXXXERROR NUMBER Z23XXXxXx%% 
1871 
1872 002672 010100 4S: MOV R1,R0 
1873 002674 162700 000002 SUB #2, RO ;CHECK THAT THE ADDRESS IS STORED AT 
1874 002700 005703 TST R3 ;LOCATION IF R3 IS NOT O 
1875 002702 001401 BEQ 5% > OTHERWISE CHECK FOR 
1876 002704 005100 COM RO *ADDRESS COMPLEMENT 
1877 002706 020104 5S: CMP R1,R4 
1878 002710 101361 BHI 3$ 
1879 002712 112737 000001 9000306 MOVB #1, d#PASFLG +SET PASFLG FOR ERROR REPORT. 
1880 002720 005103 COM R3 +COMPLEMENT THE CONTENTS OF R3 
1881 002722 001345 BNE 1% ;REPEAT TST3 IF R3. 1S NON OQ. ENABLING ADDRESS 
1882 >COMPLEMENT TO BE WRITTEN AND READ. OTHERWISE FALL THRU 
1883 002724 000733 END4: BR ENDS 
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002726 


002734 
002736 
002742 


002744 


002750 
002752 
002754 
002760 


002762 
002764 
002766 
002770 
002772 
002776 


003000 
003002 


003004 


003006 
003010 
003014 


003016 
003020 


122737 


001403 
004767 
000024 


CO4737 


020041 
001403 
004767 
000025 


000300 
010011 
021100 
001403 
004767 
000026 


000300 
001023 


005703 


001023 
062701 
020105 


103006 
020011 
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000005 900404 TSTS: 


003200 


000120 


002624 


002606 


000002 


12:37 PAGE 39 
TS 


, 


23: 


33: 


4s: 


53: 


63: 


7%: 


CMPB 
BEQ 
JSR 
24 


JSR 


TST 


N $3 

MARCHING 1'S AND O'S 

4+ RERAAARRRAAA ARERR ERAS AERA A AAA AA AAA AAA ARAN AA ARAA AAA AAA AAAS 
TEST § AND O'S 


MARCHING 1 


eee 2 


SEQ 0039 


THIS TEST. WRITES A BACK GROUND OF THE WORD STORED 


AT BAKPAT 


READS EVERY LOCATION FOR CORRECT DATA, SWAPS BYTES 
AT THE LOCATION AND PROCEEDS IN MAX. TO MIN 

DIRECTION OF MEMORY LOCATIONS. 

READS EVERY LOCATION FOR SWAPPED BAKPAT PATTERN 
WRITES BAKPAT BACKGROUND IN THE LOCATION AND PROCEEDS 
IN MIN. TO MAX. DIRECTION 

REPEATS STEP 2 GOING IN MIN. TO MAX. DIRECTION 
REPEATS STEP 3 GOING IN MAX. TO MIN. DIRECTION 


++ MEXKKAAAAAAAAA AAA AAA A AAA AA AAA AAA AAA AAA AAA AAA AAA AAA AAA A AAA AAAS 


#5, 0#STESTN 
. +10 
PC, SEQERR 


PC, d#WRTMEM 
RO, -(R1) 

3$ 

PC, ERROR 

RO 

RO, (R1) 
(R1),RO 


4% 
PC, ERROR 


RC 
95 


R3 


10% 
#2,-R1 
R1,R5 


8% 
RO. (R1) 


*CHECK FOR PROPER TEST SEQUENCE 


+XERRORX REPORT ERROR MESSAGE AND HALT AT FATHLT 
+ XXXXXXERROR NUMBER 24XX4Xxxx 


+GO TO WRITE THE MEMORY WITH A BACKGROUND OF THE 
+WORD STORED IN BAKPAT 

*READ THE CONTENTS OF LOCATION POINTED BY R1 

+TO SEE IF IT HAS THE SAME VALUE AS RO 

+XERRORX REPORT ERROR MESSAGE 

+ XXXXXXERROR NUMBER 25XXXxXxx 


+SWAP THE BYTES AT (R1) 
*READ (R1) FOR CORRECT VALUE 


+XERRORX REPORT ERROR MESSAGE © 
+ XXXXXXERROR NUMBER 26XXXxXxx 


+SWAP THE BYTES OF THE REGISTER 
+CONTAINING BACKGROUND PATTERN 

+ 1F THE LOWER BYTE OF THE REGISTER 

+ 1S NOT 0 THEN THE PROGRAM IS READING 
>THE MEMORY TO CONTAIN A BACK GROUND OF 


*BAKPAT AND WRITING THE SWAPPED WORD 
+ IN WHICH CASE GO TO 9% 


*R3 WAS 0 WHEN THE PROGRAM ENTERED 

*THIS TEST. AND IT 1S NOT ALTERED UNTIL PASFLG=3 
*1F R3 EQUAL O THEN THE PROGRAM IS 
*READING/WRITING MIN. TO MAX. OTHERWISE 

>IT 1S GOING IN MAX. TO MIN. DIRECTION 

> 1F R3 1S NOT CLEAR THEN GO TO 10% 
*OTHERWISE ADD 2 TO THE CONTENTS OF R1 
*COMPARE R1 WITH THE MAX. MEMORY LOCATION TO 
+BE TESTED 

+ 1F R1>RS THEN GO TO 8% OTHERWISE 

*READ (R1) FOR THE CORRECT DATA 
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1941 
1942 
1943 
1944 
1945 
1946 
1947 
1948 
i949 
1950 
1951 
1952 
1953 
i954 
1955 
1956 
1957 
1958 
1959 
1960 
1991 
1962 
1963 
1964 
1965 
1966 
1967 
1968 
1969 
1970 


N0O3022 


003024 
003030 


003032 
003034 
003040 
003042 


003044 
003046 
003050 


003052 
003054 


003056 
003060 
003062 


003066 
003070 


003072 
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001757 


004 767 
000027 


000753 
105237 
000300 
001742 


005103 
010401 
000762 


005703 
001353 


C20104 
101333 
105237 


000300 
001753 


000714 


002554 


000306 


000306 


12:37 PAGE 40 
TS 


83: 


9S: 


10%: 


ENDS: 


B 4 


MARCHING 1°S AND O'S 


BEQ 


JSR 
27 


BR 
INCB 
SWAB 
BEQ 


CoM 
MOV 
BR 


TST 
BNE 


CrP 
BHI 
INCB 


SWAB 
BEQ 


BR 


3$ 
PC, ERROR 


34 
a#PASFLG 
RO 
2$ 
R3 


R4,R1 
7% 


R3 
5% 


R1,R4 
2% 
aR PASFLG 


RO 
7$ 


END4 


SEQ 0040 


; WRITE COMPLEMENT OF THE DATA FOUND AT (R1) 
;AND REPEAT UNTIL Ri > R5 

;KERRORX REPORT ERROR MESSAGE 

; XXXXXXERROR NUMBER 27444%4% 


+ 1F THE LOWER BYTE OF RO IS ALL O'S 

; THEN BEGIN READING BAKPAT SWAPPED WRITING BAKPAT 
;AND READING BAKPAT GOING FROM MAX. TO MIN. PASFLG=4 
; OTHERWISE CLEAR RO 

+PUT THE LOWEST TESTING ADDRESS IN Ri 

;AND BEGIN READING O'S, WRITING 1°S AND 

;READING 1'S IN MIN. TO MAX. DIRECTION PASFLG=3 


;1F R3 tS NON OG, |.€. PASFLG=3 


; THEN READ BAKPAT, WRITE 

; SWAPPED BAKPAT AND READ SWAPPED BAKPAT 
>; IN MIN. TO MAX. DIRECTION 

*OTHERWISE TEST IS PROCEEDING IN MAX. TO 
;MIN. OIRECTION. 

+KEEP ON LOOPING UNTIL R1=R4 


> 1F RO SWAPPED HAS LOWER BYTE=0 
> THEN READ BAKPAT SWAPPED, WRITE BAKPAT. 
; AND READ BAKPA~ GOING FROM MIN. TO MAX. 
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1971 
1972 
1973 
1974 


003074 


003102 
003104 
003110 


003112 


003116 
003122 
003124 
003126 
003130 
003132 
003136 


003140 
003144 
003146 
003150 
003156 
003160 


003164 
003166 
003170 
003174 
003176 
003200 
003202 
003206 


003212 
003214 
003220 
003224 
003226 


122737 


001403 
CO4767 
000030 


004737 


005037 
010403 
010401 
020011 
001403 
004767 
000031 


062701 
020105 
103767 
132737 
001002 
105237 


020305 
103012 
012792 
000313 
005302 
001375 
010337 
062703 


000744 
105237 
000337 
001732 
000721 
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000006 


003032 


000120 
000 306 


002446 


000002 


000001 


000306 


037776 


000354 
020000 


000306 
000316 


000404 


000306 


12:37 PAGE 
T6 


41 


CELLS’ VOLATILITY TEST 


Cc 4 


ie eee ee 


sEQ@ 0041 


+s MAXXXXKAAAAAAAAAAAAA AAA AAA AAA AAA AAA AAA AA AAA AAA AAA AAA AAA AAA AAAS 
CELLS’ VOLATILITY TEST 


THIS TEST WRITES THE MEMORY WITH A BACK GROUND OF BAKPAT 
WITH PASFLG=0 THE TEST READS THE MEMORY FOR BAKPAT 

AND THEN INCREMENTS PASFLG 

17 THEN READS/SWAPS BYTES/WRITES A LOCATION X FOR 

OVER 2 MSEC AND THEN READS THE MEMORY FOR BAKPAT 

REPEATS STEP 3 WITH X=X44K UNTIL END OF MEMORY IS ENCOUNTERED 
1T THEN INCREMENTS PASFLG AND WRITES THE MEMORY TO 
BAKPAT AND WITH PASFLG=2 IT READS MEMORY FOR ALL 

SWAPPED BAKPAT AFTER WHICH PASFLG IS INCREMENTED TO 3 
REPEATS STEPS 3 AND 4 READING THE MEMORY FOR SWAPPED 
BAKPAT INSTEAD OF BAKPAT. 


55 KKKKKKKAAAA AAA AAA AKA AAA A AAA AAA AAA AA AAA AAA AAA AAA AAA AA AAA AAS 


;xXTES 


TSTé: 


4S: 


5S: 


6S: 


7%: 


END6: 


T 6 


s Ga Ge Se We Ge Ve Ve Ge Sa 
Dt DE DE DE FE FE FE FE FE 
a 


ss. & 
v= 2¢ 
~~ 
o 
— 


CMPB 


BEQ 
JSR 
30 


JSR 


#6, 0#STESTN 


. +10 
PC, SEQERR 


PC, d#WRIMEM 


ae PASFLG 
R4Y,R3 
R4Y,R1 
RO, (R1) 


4$ 
PC, ERROR 


#Z2,R1 
R1,R5 


3$ 

#1, @8PASFLG 
59 

ae PASFLG 


R3.R5 

7% 
#37776,R2 
(R3) 

R2 


6% 
R3, d#SAVLOC 
#20000, R3 


2$ 

a8 PASFLG 
a8 BAKPAT 
RPT6 
ENDS 


>CHECK FOR PROPER TEST SEQUENCE 


;XERRORX REPORT ERROR MESSAGE AND HALT AT FATHLT 
> XXXXXXERROR NUMBER SOXXXXxKx 


;GO TO WRITE THE MEMORY WITH A BACKGROUND OF THE 
;WORD STORED AT LOCATION BAKPAT 


;SET R3 
;AND R1 TO THE STARTING ADDRESS OF MEMORY UNDER TEST 
;CHECK (R1) FOR CORRECT DATA 


;XERRORX REPORT ERROR MESSAGE 
; XXXXXXERROR NUMBER S1XXXXxx 


> INCREMENT R1 BY 2 
>SEE !F R1 HAS REACHED THE MAX. OF MEMORY 


;CHECK TO SEE IF PASFLG=0 OR 2 

> IN WHICH CASE INCREMENT PASFLG COUNTER BY 1 
>SEE IF R3 HAS REACHED THE MAX. OF THE MEMORY 
;WRITE INTO 1 LOC FOR >2MS (ABOUT 100MS) 


» SAVE LOCATION WRITTEN FOR 2MS FOR ERROR REPORT. 
*BY ADDING 1 TO THE 14TH ADDRESS BIT CAUSE 

;R3 TO POINT TO A LOCATION IN THE NEXT 

*+4K BANK OF MEMORY 


>MAKE PASFLG=2 
> 1F BAKPAT 1S NOT BEING SWAPPED FOR THE Z2ND 
> THEN GO BACK TO THE LOCATION RPT6 


er we ee we ne Se - - 


D 4 
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2027 
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003230 


003236 
003240 
003244 


003246 
003252 


003256 
003260 
003264 
003266 
003270 
003272 


003274 
003300 


003304 
003310 
003312 
003314 
003320 
003324 
003326 
003332 
003334 


003342 
003344 


OO3346 


003350 
003352 
003356 


003360 
003364 
003366 
003370 
003374 


122737 


001403 
004767 
000032 


005037 
010337 


010302 
052702 
005722 
020502 
103001 
010502 


010337 
013701 


013700 
020103 
001010 
062703 
032703 
001402 
062703 
000300 
132737 


001091 
010011 


020011 


001403 
004767 
000033 


062701 
020102 
103746 
005237 
105237 
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000007 


002676 


000306 
000304 


017776 


000302 
000304 
000316 
000002 
000176 
000200 
000001 


002226 


000002 


000410 
000306 


000404 


000306 


12:37 PAGE 43 
1? SHIFTING DIAGONAL 


ee Sn caren Reani 


, 


TST?: 


23: 


4S: 


6S: 


8s: 
10%: 


128: 


149: 


16%: 


>*(1) 

;x(2) 

;X(3) 

;K(4) 

;x 

;x(5) 
;x 


CMPB 


BEQ 
JSR 
32 


CLR 
MOV 


MOV 
BIS 
TST 
CMP 
BHIS 
MOV 


MOV 
MOV 


MOV 
CMP 
BNE 
ADD 
BIT 
BEQ 
ADD 
SWAB 
BiITB 


BNE 
MOV 


CMP 


BEQ 
JSR 
33 


ADD 
CMP 
BLO 
INC 
INCB 


E 


y 


SHIFTING DIAGONAL 
THIS TEST WRITES THE MEMORY WITH A BACKGROUND OF BAKPAT 


IT WRITES A DIAGONAL OF SWAPPED BAKPAT THROUGH EACH MEMORY BANK 


READS THE MEMORY FOR CORRECT DATA 
SHIFTS THE DIAGONAL AND REPEATS STEP 3 UNTIL THE 
DIAGONAL HAS BEEN SHIFTED 64% TIMES 


WRITES A BACKGROUND OF SWAPPED BAKPAT,. 


A DIAGONAL OF 


BAKPAT AND REPEATS FROM STEP 3 
OOOO OOOO OOOO IO 
;CHECK FOR PROPER TEST SEQUENCE 


#7, 08STESTN 
. +10 

PC, SEQERR 
d#PASFLG 


R3, d#LOWBNK 


R3,R2 
#17776,R2Z 


R3,ad8STRIDI 
d#LOWBNK, R1 


dF BAKPAT, RO 
R1,R3 


8% 

*#200,R3 

RO 

fi, @dePASFLG 
12% 

RO, (R1) 

RO, (R1) 


14% 
PC, ERROR 


#2,R1 
R1,R2 


6% 
a#SDEVCT 
a8PASFLG 


;KERRORX REPORT ERROR MESSAGE AND HALT AT FATHLT 


; XXXXXXERROR NUMBER 32XXXxXxx 


;LOWBNK CONTAINS ADDRESS OF THE LOWEST LOCATION 


> IN THE 4K BANK THAT CAN BE TESTED 


*R2Z mor THE ADDRESS OF THE TOP OF THE BANK 


ADD 2 TO 


;1F RZ 1S GREATER THAN RS THEN GO TO 4$ 
+NOW RZ CONTAINS THE ADDRESS OF THE HIGHEST LOCATION 
; THAT CAN BE TESTED 


;LOAD STRTDI WITH THE STARTING ADDRESS OF THE 


+ DIAGONAL 
>R1 1S NOW POINTING TO THE LOWEST LOCATION IN THE 4K 


+ BANK 
; STORE THE CONTENTS OF BAKPAT IN RO 


>1S R1 POINTING TO A LOCATION IN THE DIAGONAL ”? 


> 1F NOT THEN GO TO 10% 
>THE FOLLOWING CODE 1S USED TO PLACE THE 


;ADDRESS OF THE NEXT LOCATION IN THE DIAGONAL 


; IN RZ 


[DIAGONAL WILL CONTAIN SWAPPED BACKGROUND PATTERN 
“CONTENTS OF LOCATION PASFLG WILL BE EVEN IF THE 
“MEMORY 1S BEING WRITTEN AND IT WILL BE OOD 


;1F IT 1S ONLY BEING READ 
> IF IT tS BEING READ ONLY THEN GO TO 12% 


; OTHERWISE WRITE THE MEMORY WITH THE CONTENTS 
> CHECK THE LOCATION POINTED BY R1 TO CONTAIN 


>PROPER DATA 

>1F IT 1S OK THEN GO TO 14% 
;XERRORA REPORT ERROR MESSAGE 
; AXXXXXERROR NUMBER S3XKXKKKX 


;CAUSE R1 TO POINT TO THE NEXT MEMORY LOCATION 


> 1S tT THE END OF THE BANK ” 
> 1F NOT THEN GO TO 6% 


>TELL APT WE ARE STIL RUNNING OKAY 


SEQ 0043 
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003400 
003404 
003412 
003414 
003416 
003420 
003422 
003426 
003430 


003434 
003440 


003442 
OOS444 


003446 
003450 
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013703 
132737 
001330 
005723 
020302 
103003 
105737 
100322 
013703 


000337 
001715 


010203 
020205 


103677 
000666 


12 


000302 
000001 


000306 
000304 
000316 


000306 


15-AUG-77 12:37 PAGE 
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183: 


END?: 


F 
44 
SHIFTING DIAGONAL 


MOV O*STRTIDILR3 
BITb #1, d8PASFLG 
BNE 4§ 

TST (R3)+ 

CMP R3,R2 

BHIS 18$ 

TSTB a#PASFLG 
BPL 4§ 

MOV OF LOWBNK, RZ 
SWAB aR BAKPAT 
BEQ 4% 

MOV R2,R3 

CMP RZ2.R5 

BLO 2$ 

RR END6 


mw me ee ee eee 


SEQ 0044 


;LOAD R3 WITH THE STARTING ADDRESS OF THE DIAGONAL 
;HAS THE READ OF THE MEMORY BEEN DONE ? 

+ 1F NOT THEN GO TO 4§ 

;ADD 2 TO THE STARTING ADDRESS OF THE DIAGONAL 
;AND UNLESS THE END OF THE BANK IS REACHED 


OR THE DIAGONAL HAS BEEN ROTATED 64 TIMES 
+REPEAT FROM 4§$ 

;MAKE R3 POINT TO THE LOWEST LOCATION IN THE 
+ 1N THE BANK UNDER TEST 


;AND IF THE TEST HAS NOT BEEN PERFORMED WITH THE 
;SWAPPED BACK GROUND PATTERN THEN GO TO 4$ 

;MAKE THE PRESENT HIGH BOUNDRY AS THE NEXT 

*LOW BOUNDRY 

; UNLESS THE PRESENT HIGH BOUNDRY 'S ALSO THE 
>HIGH BOUNDRY FOR THE MEMORY UNDER TEST 
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2103 
2104 
2105 
2106 
2107 
2108 
2109 
2110 
2111 
2112 
2113 
2114 
2115 
2116 
2117 
2118 
2119 
2120 
2121 
2122 
2123 
2124 
2125 
2126 
2127 
2128 
2129 
2130 
2131 
2132 
2133 
2134 
2135 
2136 
2137 
2138 
2139 
2140 
2141 
2142 
2143 
2144 
2145 
2146 
2147 
2148 
2149 
2150 


003452 


003460 
003462 
003466 


003470 
003472 


003476 
003502 
003504 
003506 
003510 
003512 
003514 


003520 
003522 
003524 


003526 


003532 
003534 
003536 
003542 
003546 


122737 


001403 
004767 
000034 


010402 
052702 


062702 
020205 
101401 
010502 
005046 
010200 
013740 


020003 
101374 
010301 


023710 


001410 
010001 
013700 
004767 
000035 
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002454 


017776 


000002 


000316 


000316 


000316 
002036 


12: 4 PAGE 
T10 


te ee -_——< —-~- 


G 4 


45 
READ RECOVERY GALLOPING TEST THROUGH EVERY 64TH CELL 


ret tk ceed GALOMEEY ERLOD TG TREE TRCN CERT ORTH C 


KCL) 


READ RECOVERY GALLOPING TEST THROUGH EVERY 64TH CELL 


THIS TEST WRITES THE MEMORY WITH A BACK GROUND PATTERN 

STORED AT LOCATION BAKPAT 

TEST BEGINS AT LOWEST LOCATION BEING TESTED 

(LETS NAME IT ‘A') 

LETS NAME THE 1ST LOCATION IN THE ROW/COLUMN UNDER TEST AS ‘B’. 

SWAPS BYTES FOR LOCATION ‘A’. 

READS ‘'A'. READS ‘B' 

‘'B' = 'B'+200 (MAKES ‘B'=64TH CELL |!.E. 200TH OCTAL 

LOCATION FROM THE PRESENT LOCATION OF ‘B') 

REPEATS STEPS 5S AND 6 UNTIL ‘B' IS GREATER THAN THE 

+r — UK BANK OF THE MEMORY IN WHICH ‘A’ IS RESIDING 
= H+ 

REPEATS STEPS 3-8 UNTILL ‘A’ REACHES THE END OF THE BANK 

GOES TO THE NEXT 4K BANK OF MEMORY AND REPEATS STEPS 

3-9 UNTIL THE END OF THE MEMORY 

AFTER EXECUTING THE TEST BYTES ARE SWAPPED AT 

LOCATION BAKPAT AND STEPS 1-10 ARE REPEATED 

IN THIS TEST RO IS POINTING TO LOCATION ‘A’. R1 TO 

LOCATION 'B', R2 TO THE END OF THE 4K BANK IN WHICH THE 

TEST 1S TAKING PLACE AND R3 TO THE LOWEST LOCATION IN THE 

COLUMN/ROW CONTAINING ‘A’ AND ‘B' 

MOST OF THE CODE USED BY THiS TEST IS ALSO USED BY TEST 11 


7 OOOO OO RR RR RK 
000010 00404 = TST10: 


RPT10: 


GALLOP: 


23: 
Us: 


6$: 


CMPB 


BEQ 
JSR 
34 


SEQ 0045 


#10, d08STESTN ;CHECK FOR PROPER TEST SEQUENCE 

. +10 

PC, SEQERR ; XERRORKX REPORT ERROR MESSAGE AND HALT AT FATHLT 
; KXXXXXXERROR NUMBER 34XXXKxXxXX 

R4Y,R2 ;SET R2 TO THE LOWEST MEMORY UNDER TEST 

#17776-R2 ;MAKE R2 POINT TO THE HIGHEST LOCATION IN THE 4K 
;BANK FOR WHICH GALLOPING WILL BE PERFOMED 

#2,R2Z ; INCREMENT R2 BY 2 

_ ;1F THE HIGH BOUNDRY OF THE TEST |S HIGHER THAN 

2 

erent >THE MAXIMUM ALLOWED ADDRESS THEN ADJUST RZ 

- (SP) 

R2,R0 

aeBAKPAT.-(RO) ;WRITE THE MEMORY UNDER TEST WITH A BACKGROUND OF 
; BAKPAT 

RO.R3 

4% 

R3.R1 ;R3 AND R1 ARE POINTING TO THE LOWEST LOCATION THAT 


;CAN BE TESTED IN THIS BLOCK 
deBAKPAT, (RO) 
+(RO) CHECK IT 


8% CONTINUE IF OK 

RO. R1 ;OTHERWISE PREPARE TO REPORT THE ERROR 
d*BAKPAT, RO 

PC, ERROR ; KERRORX REPORT ERROR MESSAGE 


> KAXXHKKERROR NUMBER SO¥444K4 


;BEFORE STARTING THE GALLOPING TEST FOR LOCATION 


Sa 


Hy 
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2159 003550 010011 MOV RO, (R1) ;RESTORE THE CONTENTS OF (R1) 
her 003552 010100 MOV R1i,RO *RESTORE RO 
2162 003554 000310 8$: SWAB (RO) 
2163 003556 031011 10%: BiT (RO), (R1) ;CHECK TO SEE THAT NONE OF THE BITS SET 
2164 > 1N (RO) ARE SET IN (R1) AND VICE VERSA 
tps 003560 020001 CMP RO, R1 >THE ONLY EXCEPTION TO THIS WILL BE WHEN RO=R1 
2167 O003562 001412 BEQ 12% 
2168 003564 021137 O00315 CMP (R1),d#BAKPAT ;CHECK THAT (R1) HAS BAKPAT IN IT 
2169 003570 001407 BEQ 12$ 
2170 003572 010046 MOV RO, - (SP) ;SAVE RO ON STACK 
2171 003574 O12700 000316 MOV de BAKPAT, RO ;PLACE THE PATTERN WORD IN RO 
2172 003600 004767 002000 JSR PC, ERROR ;XERRORX REPORT ERROR MESSAGE 
ayes 002604 O00036 36 > XXXXXXERROR NUMBER S36XXXXxx 
2174 
2175 003606 012600 MOV (SP)+,R0 *RESTORE RO 
2176 003610 021037 000320 12S: CMP (RO), d#SWAPAT ;CHECK THAT (RO) HAS SWAPPED BAKPAT IN IT 
2177? 003614 O01412 BEQ 14% 
2178 003616 010146 MOV Ri,-(SP) >SAVE R1 ON THE STACK 
2179 003620 010001 MOV RO,R1 ;MAKE R1 POINT TO THE FAILING LOCATION 
2180 003622 013700 900320 MOV d*# SWAPAT, RO ;LOAD RO WITH THE EXPECTED RESULT IN (R1) 
2181 003626 004767 001752 JSR PC, ERROR > KERRORX REPORT ERROR MESSAGE 
tes 003632 000037 37 > XXXXXXERROR NUMBER S7XXXxKx% 
1 
2184 003634 010011 MOV RO, (R1) ;RECOVER (R1) FROM THE ERROR 
2185 003636 010100 MOV R1,R0 ;RESTORE RO 
2186 003640 012601 MOV (SP)+,R1 *AND RESTORE R1 
2187 003642 122737 O00011 900404 14$ CMPB #11, ad8STESTN > 1S THE PROGRAM EXECUTING TEST # 11 ? 
2188 003650 001402 BEQ 16% > IF SO THEN GO TO 16% 
2189 003652 062701 000176 ADD #176,R1 
2190 003656 062701 000002 16%: ADD #2,R1 ;MAKE Ri POINT TO THE NEXT ADJACENT CELL 
2191 003662 020102 CMP R1,R2 ;AND IF R1 HAS NOT REACHED THE END OF THE BOUNDRY 
2192 O03664 103734 BLO 10% > THEN REPEAT FROM 10% 
2193 003666 000320 SWAB (RO}+ *>RESTORE THE LOCATION FOR WHICH THE GALLOPING TEST 
2194 ;WAS BEING PERFORMED 
2195 003670 122737 000011 900404 CMPB Ril, deSTESTIN -IS IT TEST 11 ? 
2196 003676 001407 BEQ 17% > 1F SO THEN GO TO 17% 
2197 003700 905723 TST (R3)+ ;OTHERWISE INCREMENT R3 BY 2 
2198 003702 062716 000002 ADD #2, (SP) ;FOR EVERY ROW/COLUMN TESTED ADD 2 
2199 003706 106716 TSTB (SP) 
2200 003710 100002 BPL 174% *UNTIL (SP) IS 200 
2201 003712 161693 SUB (SP),R3 ;SUBTRACT 200 FROM RS 
2202 003714 005016 CLR (SP) 
2203 003716 032700 000177 17%: BiT #177,R0 *AT A 64TH CALL BOUNDRY” 
2204 003722 001002 BNE 18% ;BRANCH IF NO 
2205 003724 005237 000410 INC ae SDEVCT >TELL APT WE ARE STILL RUNNING 
2206 003730 020002 18%: CMP RO. RZ > 1F RO HAS NOT REACHED THE END OF THE BOUNDRY 
2207 003732 103674 BLO 6$ > THEN REPEAT FROM 6% 
2208 003734 162603 SUB (SP)+,R3 *RESTORE SP AND R3 
2209 003736 000337 000320 SWAB d* SWAPAT 
2210 003742 000337 000316 SWAB a BAKPAT 
2211 003746 001660 BEQ 2$ ;1F THE LOWER BYTE OF BAKPAT 1S O THEN REPEAT FROM 29% 
2212 003750 010203 MOV R2,R3 > OTHERWISE MAKE THE PRESENT HIGH BOUNDRY AS THE 
2213 >NEXT LOW BOUNDRY 
2214 003752 020205 CMP R2,R5 


ce ee ee ee a a ea ee 


ry 
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2215 003754 001410 BEQ END10 ;1F PREVIOUS HIGH BOUNDRY WAS THE END OF THE 
2216 ; TEST BOUNDRY THEN EXIT THE TEST 
221? 003756 032702 017776 BIT #17776,R2 ;WAS 1T A 4K BOUNDRY ? 
2218 003762 001025 BNE RPT11 ; IF NOT THEN WE WERE PERFORMING TEST 11 WITH LONG 
2219 ;GALLOPING TEST DISABLED 
2220 003764 122737 000011 O00404 CMPB #11, 08STESTN ; IF IT 1S TEST # 11 THEN GO TO REPEAT TEST 11 
2221 003772 001421 BEQ RPT11 
2222 003774 OCO636 BR RPT10 ;OTHERWISE REPEAT TEST 10 
2223 003776 000624 END10: BR END? 
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004000 


004006 
004010 
004014 


004016 


004020 
004024 
004026 
004032 
004036 
004042 


004044 


004050 


122737 


001403 
004767 
000040 


010402 


105777 
100004 
004767 
046107 
105777 
100613 


052702 


000612 
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000011 


002126 


174424 
002540 


000120 
174406 


000176 


000404 
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READ RECOVERY LONG GALLOPING/FAST GALLOPING TEST 


11 


% 
+x(11) 
CMPB 
BEQ 


JSR 
40 


at a ates bet tie ae oe 


READ RECOVERY LONG GALLOP ING/FAST GALLOPING TEST 


THIS TEST WRITES MEMORY WITH BAKPAT 
THE TEST BEGINS AT THE LOWEST LOCATIUN BEING TESTED 


(LETS NAME IT ‘B') 
MOVE THE ADDRESS OF 


SWAPS BYTES FOR LOCATION ‘A’ 
READS ‘'A', READS ‘B' 


'B'='B'42 

IF GALLOPING OPTION BIT AT SSWREG 1S HIGH THEN STEPS 4 AND 5 
ARE REPEATED UNTIL ‘B' REACHES THE HIGHEST MEMORY LOCATION 
OF THE 4K BANK IN WHICH ‘A’ 
DECREMENTED BY 2 AND AFTER MAKING ‘B‘ TO POINT TO THE LOWEST 
LOCATION OF THE 4K MEMORY BANK CONTAINING ‘A’ STEPS 3.4.5 AND 
‘A’ EQUALS THE END OF THE ENTIRE MEMORY 
IF GALLOPING OPTION BIT |S NOT HIGH THEN STEPS 4 AND 5 ARE 
REPEATED UNTIL ‘'B' IS POINTING TO A CELL IN THE NEXT COLUMN 
IF SEQUENTIAL CELLS LIE ALONG THE ROW, 
IF SEQUENTIAL CELLS LIE ALONG THE COLUMN, 
STEPS 2.3,4,5 AND 7 ARE REPEATED UNTIL THE END OF THE MEMORY 
TEST 1S REPEATED FOR THE OPPOSITE BACKGROUND DATA 

IN THIS TEST RO POINTS TO LOCATION ‘A’, Ri TO LOCATION 
RZ TO THE HIGHEST LOCATION AND R3 TO THE LOWEST 


6 ARE REPEATED UNTIL 


‘B' 
, 


1S RESIDING, 


LOCATION IN A 6474K CELL BOUNDRY 


MOST OF THE CODE USED BY TEST 10 IS ALSO USED BY THIS TEST 
2 MAAAAKAK AAA AKER RAE AAAA AA AAA AAA AAA AAA AAA AAA AKA 


#11, d8STESTN 


. +10 
PC, SEQERR 


R4,RZ 


ASWR 
RPT11 


PC,PNTMES 


7GLP/ 
dSWR 
RPT10 


#176,R2 


GALLOP 


THEN 


*CHECK FOR PROPER TEST SEQUENCE 


+ XERRORX REPORT ERROR MESSAGE AND HALT AT FATHLT 


> XXXXXXERROR NUMBER 4YOXXKKKX 


>MAKE RZ TO POINT TO THE LOWEST LOCATION 


*UNDER TEST 

*LONG GALLOP ENABLED? 
>BRANCH IF NO 

>TYPE “GLP" 


+LONG GALLOPING ENABLED? 
*BRANCH IF YES 
>TO RPT10 


*OTHERWISE SET THE LOW ORDER BITS OF THE ADDRESS 


>TO GET THE HIGH BOUNDRY 
> PERFORM GALLOPING TEST 


'B' TO THE POINTER FOR LOCATION ‘A’ 


1S 


OR THE NEXT ROW 
AT WHICH TIME 


SEQ 0048 


ee ee eee eee oe - 
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004052 
004060 
004062 
004066 


004070 
004074 
004100 
004106 


004110 
004114 
004116 
004120 
004122 
004124 


004126 
004130 


004132 
004134 
004142 


122737 
001403 
004767 
000041 


012702 
012703 
112737 
010401 


01370) 
030201 
001004 
030301 
001404 
005100 


000402 
030301 


001774 
132737 
001001 
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000012 
002054 


000002 
000400 
000001 


000316 


000002 


000404 


000206 


000306 


12:37 PAGE 
T12 


49 


me ee eee ee 
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WORST CASE TESTING FOR CORE MEMORY 


aa ia Gantt Cae kta ta ne 


=~ 
o 


o-«~ 
“J 


BS. We We Be We Be We Be Be Be 
De PE DE FE FE PE FE FE FE FE 
— 


uw 


WORST CASE TESTING FOR CORE MEMORY 
STARTING FROM THE LOWEST LOCATION UNDER TEST THE MEMORY 
IS WRITTEN WITH A BACKGROUND OF BAKPAT, HOWEVER LOCATIONS 
HAVING ADDRESS SUCH THAT EXCLUSIVE OR OF ADDRESS BITS 1 & 
8 = 1 ARE WRITTEN TO A VALUE OF SWAPPED BAKPAT 
STARTING FROM THE LOWEST LOCATION THE MEMORY IS CHECKED 
TO CONTAIN THE CORRECT DATA AS EXPLAINED IN STEPS 3 8 4, 
UNTILL THE HIGHEST LOCATION UNDER TEST |S REACHED 
READ EACH LOCATION FOR THE CORRECT CONTENT 
COMPLEMENT THE LOCATION AND READ IT; COMPLEMENT THE LOCATION 
BACK TO ITS ORIGINAL VALUE AND READ IT AGAIN 
STARTING FROM THE HIGHEST LOCATION UNDER TEST REPEAT STEPS 
3 & 4 UNTIL THE LOWEST LOCATION UNDER TEST IS REACHED 
REPEAT STEPS 1-5, HOWEVER THIS TIME LOCATIONS WITH XOR 
OF ADDRESS BITS 8 & 13 =1 ARE WRITTEN TO SWAPPED BAKPAT 
REPEAT STEPS 1-5, HOWEVER THIS TIME LOCATIONS WITH XOR 
OF ADDRESS BITS 3 & 9 =1 ARE WRITTEN TO SWAPPED BAKPAT 
REPEAT STEPS 1-7 WITH A BACKGROUND OF SWAPPED BAKPAT AND 
ee TO BE WRITTEN TO SWAPPED BAKPAT WRITTEN TO 

K 


; B ; 
55 KEKKKKKKKK KKK AKA AKA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA 


TST12: 


1%: 
23: 


4S: 


6S: 


8$: 


12%: 


CMPB 
BEQ 
JSR 
41 


MOV 
MOV 
MOVB 
MOV 


hoy 
BIT 
BNE 
BiT 
BEQ 
COM 


BR 
BIT 


BEQ 
BITB 
BNE 


oe aati ct >CHECK FOR PROPER TEST SEQUENCE 
+1 
PC, SEQERR ; KERRORK REPORT ERROR MESSAGE AND HALT AT FATHLT 
; MXXXXXERROR NUMBER Y1XKKKKX 
#2,RZ ;PREPARE TO TAKe THE EXCLUSIVE OR OF ADDRESS BITS 1 
#400.R3 AND 8 
#1, d8PASFLG > INITIALIZE THE COUNTER FOR THE SUBTEST 
R4,R1 ;PLACE THE STARTING ADDRESS OF MEMORY UNDER 
>TEST IN R1 
d#BAKPAT, RO 
R2,R1 ;CHECK TO SEE IF ADDRESS BIT STORED IN RZ IS SET 
8% > IF IT 1S SET THEN GO TO 8% 
R3,R1 /CHECK TO SEE IF ADDRESS BIT POINTED BY R3 IS SET 
12% >1F tT 1S NOT SET THEN GO TO 12% 


RO >COME HERE ONLY IF EXCLUSIVE OR OF ADDRESS BITS 
;POINTED BY RZ & POINTED BY R3 = 1 IN WHICH 
;CASE PREPARE TO WRITE THE LOCATION 
»WITH A COMPLEMENT OF LOCATIONS NOT MEETING 
> THIS CONDITION 


>COME HERE IF ADDRESS BIT POINTED BY R2 IS 1 AND 
;CHECK ADDRESS BIT POINTED BY R3 

>; 1F ADDRESS BIT POINTED BY R3 IS O THEN GO TO 6% 
> 1S tT 2ND OR 3RD PASS OF THE SUBTEST ” 

> 1F SO ‘HEN READ THE MEMORY 


12% 
R3,R1 


6% 
#2, @8PASFLG 
14% 


SEQ 0049 
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004144 
004146 
004150 
004152 
004156 


004160 
004164 
004166 
004170 
004172 
004174 
004200 


004202 
004204 
004206 
004210 
004212 
004220 
004222 


004226 
004230 
004232 
004236 
004244 
004246 


004252 
004254 
004256 


004262 
004266 
004274 
004276 
004 300 
004 304 
004 306 
004310 
004314 
004320 
004322 


010011 
020011 
001403 
004767 
000042 


012746 
005100 
005111 
020011 
001404 
004767 
00CO043 


010011 
005316 
001366 
005726 
122737 
001412 
062701 


020105 
103727 
105237 
122737 
001720 
162701 


020104 
103315 
012702 


105237 
123727 
103701 
101004 
012702 
006303 
000674 
005137 
105737 
001654 
000625 
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001426 


000002 


001404 


000003 
000002 


NNO 306 
000002 


000002 


020000 
000307 
000307 
000010 


000316 
000316 


000306 


000306 


000002 
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14S: 


163: 
183: 


19%: 


203: 


223: 


END12: 


= 


RO, (R1) 
RO, (R1) 


16% 
PC, ERROR 


#2, - (SP) 
RO 


(R1) 
RO, (R1) 


19% 

PC, ERROR 
RO, (R1) 
(SP) 

18% 


(SP )+ 
#3, @RPASFLG 


Ri,R5 


4% 
aePASFLG 
#2, d#PASFLG 


2$ 

#2,R1 
R1,R4 

4% 
#20000, R2 


a8 PASFLG+1 
O#PASFLG+1, #2 


a*# BAKPAT 
ae BAKPAT 
TST12 
END10 


; 
— 


SEQ 0050 


OTHERWISE WRITE THE MEMORY BFORE READING IT 
+READ THE MEMORY FOR CORRECT CONTENTS 


;XERRORX REPORT ERRCR MESSAGE 
; XXXXXXERROR NUMBER 424XXa%% 


;READ THE MEMORY AGAIN 


;KERRORX REPORT ERROR MESSAGE 
> XXXXXKERROR NUMBER YSXXKKKK 


*+RESTORE THE LOCATION (R1) 


;EXECUTE THE CODE FROM 18% TWICE | 
;RESTORE THE STACK POINTER 

;1S 1T THE 3RO PASS OF THE SUBTEST ? 

; 1F SO THEN GO TO 20% 

; IN FIRST 2 PASSES THE PROGRAM PROCEEDS IN 

;MIN. TO MAX. DIRECTION 

HAVE WE REACHED THE MAX. ADDRESS UNDER TEST 7? 

> 1F NOT THEN REPEAT FROM 4S 


;1F IT |S THE 2ND PASS OF THE SUBTEST 

+ THEN REPEAT FROM 25S 

;OTHERWISE EXECUTE THE TEST IN MAX. TO MIN. 
*DIRECTION 

;HAVE WE REACHED THE MIN. ADDRESS UNDER TEST ”? 
> 1F NOT THEN REPEAT FROM 4S 

;PREPARE TO CHECK THE MEMORY WITH THE XOR OF 
;ADDRESS BITS 8 AND 13 

>THE SUB TEST HAS CHECKED THE XOR ONE KIND 
;HAS TWO XOR COMBINATIONS BEEN CHECKED ” 

; |F NOT THEN GO TO 1$ 

; 1F ALL THREE HAVE BEEN CHECKED THEN GO TO 22% 
;1F tT 1S THE 2ND XOR COMBINATION THEN CHECK 
*>FOR ADDRESS BITS 3 & 8 


> 1F THE TEST WAS NOT PERFORMED WITH THE SWAPPED 
>BAKPAT THEN RE-EXECUTE THE TEST 


MY BF TO eI ie i eae 
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2367 +o KXXXXXXKKAAAAAAAA AAA AAA AAA AAA AA AA AAA AA AAA AA AAA AAA AA AA AAA AAAS 
2368 ;KTEST 13 WRITE RECOVERY TES 
2369 ;x THIS TEST DIFFERS FROM 0-12 IN THAT IT CONSISTS OF A SMALL TEST PROGRAM 
2370 ;x ACTUALLY RUNNING IN THE 4K BANK UNDER TEST. 
2371 ;x THE PROGRAM IS SELF MODIFYING AND MAY BE DIFFICULT TO DEBUG. 
2372 ;x TO AID IN THE DEBUG, BEFORE A A BANK IS ENTERED "“TST13 BANK XxX" 
2373 ;x iS TYPED. THIS WILL ALLOW THE USER TO AT LEAST SEE WHICH MEMOR: 
2374 ;x BANK FAILED. 
2375 ;x THE TEST CONSISTS OF 1/72 OF THE BANK STORED WITH “MOV RZ,-(PC)” 
2376 :3 AND THE OTHER 1/72 CONTAINING "177667". "177667" IS THE COMPLEMENT 
2377 x OF "JMP (RO)" INSTRUCTION. 
2378 ;x R2 CONTAINS "COM -(R1)" INSTRUCTION ON ENTRY TO THE BANK AND R1 CONTAINS 
2379 ;8 THE HIGHEST TEST ADDRESS IN THAT BANK. THE HIGHEST TEST ADDRESS IS 
2380 ; x USUALLY ON 4K BOUNDARIES. WHEN TESTING BANK O RELOCATED, HOWEVER 
2381 ;x Ri CONTAINS THE FIRST FREE TEST ADDRESS BELOW THE DIAGNOSTIC. 
2382 ;x IF YOU UNDERSTAND THIS SO FAR THE REST IS EASY. 
2383 ;8 THE TEST EXECUTION IS AS FOLLOWS: 
2384 ;x 1. THE "MOV R2,.-(PC)" INSTRUCTION EXECUTES STORING 
2385 ;x THE CONTENTS OF R2 IN THE ADDRESS IT VACATED (QUE TO -(PC). 
2386 ;x 2. SINCE R2 CONTAINS A “COM -(R1)" INSTRUCTION IT COMPLEMENTS 
2387 5§ THE HIGHEST ADDRESS UNDER TEST. THIS ADDRESS CONTAINED 
2388 ;x "177667" SO AFTER THE COM -(R1) IT EQUALS 110 
2389 ;x CLEVERLY THIS |S THE “JMP (RO)" INSTRUCTION. 
2390 ;x 3. THIS SEQUENCE CONTINUES UNTIL THE “MOV R2.,-(PC) INSTRUCTIONS 
2391 ;x REACH THE MIDDLE OF THE TEST BANK. THEN THE "JMP (RO)" INSTRUCTION IS 
2392 ;x AND EXECUTED. RO CONTAINED THE RETURN ADDRESS BACK 
2393 ;x TO TEST 13. 
2394 [3 4 THESE STEPS ARE REPEATED FOR EACH BANK UNDER TEST. 
2395 ;x 
2396 55 ARKKAKKKKKEK KAKA KAKA KAKA KKK AAA AAA AAA AAA AAA AAA AAA AAA AAA AAA AEE 
2397 OO4324 122737 000013 OO0O404 TST123: CMPB #13, d8STESTN ;CHECK FOR PROPER TEST SEQUENCE 
2398 OO4332 001403 BEQ . +10 | 
2399 OO4334 004767 001602 JSR PC, SEQERR ; KERRORX REPORT ERROR MESSAGE AND HALT AT FATHLT 
2400 OO4340O O00044 YY >; XX¥XXXERROR NUMBER 4YXXXXXX 
2401 
2402 OO8342 012702 010247 1$: MOV #10247,R2 oy: THE OP CODE OF INSTRUCTION MOV R2,-(PC) 
2403 i | 
2404 OO4S46 012700 177667 MOV #177667.,R0 ;PLACE THE COMPLEMENT OF THE INSTRUCTION 
2405 ;JMP (RO) IN RO 
2406 ; INSURE LOWEST TEST ADDRESS TO END OF 4K SEGMENT IS MULTIPLE OF 2 
2407 ;SINCE THE TEST STORES "MOV R2,.-(PC) IN 172 AND 177667 IN THE OTHER 172 
2408 
2409 O04352 010546 23: MOV R5,-(SP) ; SAVE R5 
2410 OO04354 010446 MOV R4,-(SP) ;STORE LOWEST ADDRESS ON STACK 
2411 OO4356 000241 293: CLC 
2412 004360 006005 ROR RS ;MAKE POSITIVE BYTE COUNT OF HIGH ADDRESS 
2413 004362 006004 ROR R4 ;DO SAME FOR LOWEST ADDRESS 
2414 OO4364 160405 SUB R4,R5S ;GET OIFFERENCE OF LOWEST ADDRESS AND HIGHEST 
2415 004366 006005 ROR RS ; 1F DIFFERENCE 1S ODD THEN RY IS AT LOWEST ADDRESS 
2416 004370 103002 BCC 30% ;BRANCH IF RY IS AT LOWEST TEST ADDRESS. 
2417 004372 062716 000002 ADD #2, (SP) ; INCREASE LOWEST TEST ADDRESS BY 2 
2418 004376 012604 308: MOV (SP)+,R4 ;RESTORE RY (POSSIBLY INCREASED BY 2 FROM ENTRY) 
2419 OO04400 012605 MOV (SP)+,R5 ;RESTORE HIGHEST TEST ADDRESS 
2420 OO4402 010403 MOV R4Y,R3 a THE LOWEST LOCATION UNDER TEST 
2421 ; 
2422 OO4404 000405 BR 283 ;LEAVE LOW BITS OF R3 ALONE FIRST TIME IN CASE BANK O 





N 4 
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2423 OO4406 042703 017776 3$: Bic #17776,R3 +CAUSE R3 TO POINT TO THE LOWEST LOCATION 
2424 + IN THE 4K BANK UNDER TEST 
2425 004412 105737 000405 TSTB O#REL +ARE WE RELOCATED? 
2426 004416 100504 BMI 14$ +BRANCH IF YES-TEST BANKO ONLY- 
2427 004420 020305 283: CMP R3,R5 +1F R3 1S HIGHER THAN THE HIGHEST LOCATION 
2428 OO4%422 103102 BHIS 14$ ;UNDER TEST THEN EXIT 
2429 + 1F RS LESS THAN. 20000 THEN WE ARE TESTING BANKO RELOCATED IN BANKO 
2430 004424 020527 020000 CMP R5, #20000 + 1S HIGHEST TEST ADDRESS BELOW 4K? 
2431 OO4430 103002 BHIS 31% ;BRANCH IF NO 
2432 OO4%432 010501 MOV R5,R1 +SET R1 TO HIGHEST TEST ADDRESS IN BANKO 
ag 004434 oO00405 BR 32% 
2435 OO4436 010301 313: MOV R3,R1 +SET R1 TO LOWEST CURRENT TEST ADDRESS 
2436 OO444O 042701 017776 BIC #17776,R1 +CLEAR LOW ORDER ADDRESS BITS 
2437 OO4444 062701 020000 ADD #Z0000, R1 >CAUSE R1 TO POINT TO THE HIGHEST LOCATION+2 
2438 +OF THE 4K BANK BEING POINTED BY R3 
2439 OO4%450 020137 O00340 323: CMP R1, d#MAXMEM +1F R1 1S HIGHER THAN M9X. OF THE 
2440 OO0O4454 101065 BHI 14% ;MEMORY+2Z2 ALTHOUGH R3 IS LESS THAN R5 
2441 > THEN THE HIGHEST LOCATION UNDER 
ae +TEST 1S NOT IN A 4K BANK EXIT 
y 
2444 OO4456 132737 000001 000306 BITB #1, d8PASFLG + 1S THE LOWEST BIT OF LOCATION PASFLG 
2445 004464 001101 BNE 16% +SET? IN WHICH CASE BACK GROUND HAS 
2446 +ALREADY BEEN WRITTEN AND WRITE RECOVERY 
shes > TEST IS BEING PERFORMED 
y 
2449 004466 020304 4S: CMP R3,R4 +OTHERWISE WRITE THE BACKGROUND 
2450 004470 103430 BLO 8% +DEF INED AT STEP 3. 
2451 OO4472 105737 000307 TSTB a*PASFLG+1 +1S THE TEST JUST DOING READ, |. €E. 
2452 004476 001002 BNE 6% + 1S THE PASFLG+1 LOCATION NON ZERO? IF SO 
2453 + THEN GO TO 6$ 
2454 OO4500 012713 010247 MOV #10247, (R3) *WRITE THE LOCATION WITH THE OP CODE FOR MOV R2,-(PC) 
2455 004504 020213 6S: CMP R2, (R3) *READ (R3) TO CONTAIN CORRECT DATA 
2456 004506 001421 BEQ 8% 
2457 004510 010046 MOV RO, -(SP) >SAVE RO 
2458 004512 010146 MOV R1,- (SP) >AND R1 ON THE STACK 
2459 004514 010301 MOV R3,R1 
2460 004516 010200 MOV R2,R0 *SET RO= GOOD DATA FOR ERROR PRINTOUT 
2461 004520 004767 001060 JSR PC, ERROR +XERRORX REPORT ERROR MESSAGE 
2462 004524 000045 45 > XXXXXXERROR NUMBER 4YSXXXxXxx 
2463 
2464 004526 012601 MOV (SP)+,R1 *RESTORE Ri 
2465 004530 012690 . MOV (SP)+,R0 +AND RO 
2466 004532 105737 000306 TSTB d*PASFLG > 1F PASFLG 1S O AND THE MEMORY DOES NOT HAVE 
2467 + THE PROPER DATA THEN WE DON'T WANT TO GO AND 
2468 +EXECUTE THE INSTRUCTIONS STORED IN MEMORY UNDER 
2469 ; TEST 
2470 004536 001005 BNE 8% >BRANCH IF PASFLG NOT =0 
2471 
2472 OO4S4O 010200 MOV R2,RO ;SAVE FOR ERROR REPORT 
2473 OO4542 004767 001036 JSR PC, ERROR +XERROREX REPORT ERROR MESSAGE 
2474 004546 000046 46 + XXXXXXERROR NUMBER 4OXXXKXX 
2475 
2476 004550 000664 BR END12 ;ABORT TST 13. 
2477 
2478 004552 062703 000002 8$: ADD #2,R3 > INCREMENT R3 BY 2 
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2479 004556 162701 000002 SUB #2,R1 ;DECREMENT R1 BY 2 
2480 004562 020105 CMP R1,R5 ;WRITE THE BACKGROUND DEFINED AT STEP 4. 
2481 004564 103014 BHIS 12$ 
2482 004566 020103 CMP R1,R3 ;HAS STORING THE 177667 REACHED WHERE “MOV RZ,-(PC) IS? 
2483 004570 103405 BLO 10$ ;BRANCH IF YES DON'T DESTROY THE MOV RZ,-(PC) IS. 
2484 004572 105737 000397 TSTB a#PASFLG+1 ; 1S THE THE READ ONLY CHECK PASS? 
2485 004576 001002 BNE 10% ;BRANCH IF YES 
2486 OO0O46E00 012711 177667 MOV #177667, (R1) ;WRITE THE LOCATION WITH THE COMPLEMENT OF THE 
2487 ;OP CODE JMP (RO) 
2488 004604 020011 10%: CMP RO, (R1) ;READ R1 TO CONTAIN CORRECT DATA 
2489 004606 001403 BEQ 123 
2490 004610 004767 900770 JSR PC, ERROR ;XERRORX REPORT ERROR MESSAGE 
aba 004614 g0C047 47 ; XXXXXXERROR NUMBER 47XXXXXx 
2493 004616 020301 123: CMP R3,R1 ; 1F WE HAVE NOT REACHED THE MIDDLE OF 4K BANK 
wee 004620 103722 BLO 4% ; THEN REPEAT FROM 4S 
abe ;RETURN HERE AFTER PROGRAM RUN IN BANK UNDER TEST 
2498 004622 062703 020000 135: ADD #20G00,R3 ; OTHERWISE GO TO THE NEXT 4K BANK 
abs 004626 000667 BR 3$ 
2501 OG4630 122737 O00001 O00306 148: CMPB #1,@"PASFLG ; THE PROGRAM CONTROL COMES HERE AS FOLLOWS 
2502 ;1-PASFLG=0, PROGRAM HAS JUST COMPLETED A 
2503 ; WRITE/ZREAD CYCLE FOR THE BACK GROUND 
2504 ; AND WANTS TO BEGIN THE WRITE RECOVERY TEST 
2576 OO04636 001440 BEQ 24 ;2-PASFLG=1,. PROGRAM HAS JUST COMPLETED 
2£06 ; THE WRITE RECOVERY TEST AND WANTS TO 
2';07 ; READ MEMORY FOR CORRECT DATA 
2508 004640 103630 BLO END12 ; 3-PASFLG=2. PROGRAM HAS CORRECTLY READ THE 
aay ; MEMORY AND WANTS TO GO THE NEXT TEST. 
251 
2511 OO4%642 105137 O00307 COMB aePASFLG+1 ; ENTER HERE WITH PASFLG=0, ON THE FIRST ENTRY 
2512 ;ENABLE READ ONLY FOR THE MEMORY AND ON THE SECOND 
2513 ;ENTRY DISABLE READ ONLY 
2514 OO0%646 001241 BNE 2$ 
2515 004650 012702 005141 MOV #5141,R2 amg THE OP CODE FOR INSTRUCTION COM -(R1) 
2516 ; IN 
2517 OO4%65% 012700 177740 MOV #13$-. -6-R0 ;PLACE THE RETURN ADDRESS IN RO AS 135 
2518 004660 060700 ADD PC.RO ; THUS WHEN THE READ RECOVERY TEST REACHES 
2519 ; THE MIDDLE OF THE 4K MEMORY THEN THE 
2520 ; INSTRUCTION EXECUTED WILL BE JMP (RO) 
2521 ;BRANCHING!NG THE PROGRAM TO 13% 
2522 004662 105237 O00306 15%: INCB ae PASFLG ; INCREMENT PASFLG BY 1. 
oo 004666 000631 BR 2$ 
4 
2525 004670 032777 OO0G20 173552 16%: BiT #20, dSWR ;HAS THE PRINTOUTS BEEN SUPRESSED ? 
2526 004676 001017 BNE 189% >; 1F SO THEN GO TO 18% 
2527 004700 105737 GO00042 TSTB a842 ; 1S THE PROGRAM RUNNING UNDER ACT? 
2528 004704 001014 BNE 18$ ;BRANCH IF YES 
2529 004706 004767 001660 JSR PC, PNTMES ; TYPE THE BANK UNDER TEST 
2530 004712 051524 030524 020063 ASCIZ /TST13 BANK/ 
2531 004720 O40502 045516 000 
2532 004726 _ EVEN 
2533 004726 004767 002476 JSR PC, GETBNK ;GET BANK NO. UNDER TEST INTO DECWRD FOR PRINT. 
2534 004732 004767 001662 JSR PC, STPDEC ; TYPE BANK NO. UNDER TEST 


SS _ 
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DZKMPD. P11 15-AUG-77 12: 3 WRITE RECOVERY TEST SEQ 0054 
2535 | 
oH 004736 000113 18$: JMP (R3) ;BEGIN EXECUTING MOV RZ2,-(°C) . COM -(R1) SEQUENCE IN TES 
2538 
2539 £ 4740 105137 000307 24S: COMB ae PASFLG+1 
2540 3.04744 012700 000110 MOV #110,R0 ;PLACE THE OP CODE FOR JMP (RO) IN RO 
2541 004750 O000744 BR 15$ ; READ THE MEMORY FOR CORRECT DATA AFTER 
2542 > INCREMEMTING PASFLG TO 2 
2543 
2544 >TST13 EXITS VIA END1Z. 
2545 
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004752 
004760 
004764 


004766 
004774 
004776 
005002 
005004 


005012 
005016 


005024 


005030 
005032 
005036 
005040 


005044 
005050 
005054 


005056 
005062 
005064 
005070 
005072 
005076 
005102 
005106 
005112 


005116 
005122 
005124 


005130 
005134 
005136 
005140 
005144 
005150 


005154 
005160 


012737 
105737 
001065 


032777 
001046 
105737 
100420 
112737 


004767 
042522 


013705 


014445 
020427 
101374 
000165 


013705 
105737 
100016 


012704 
012524 
020537 
103774 
105037 
010537 
012706 
010637 
0001 37 


105737 
001073 
004767 


105737 
001462 
000402 
004767 
012703 
004767 


012704 
020237 


15-AUG-77 12: 36 


DS "7 
15-RUG-77 12:37 PAGE 55 | 
PARITY OR RELOCATE? SEQ 0055 | 
000377 000316 RELOC: MoV #377, a#BAKPAT 
000276 TSTB 3s @RNMAVA ; 1S THE MEMORY MANAGEMENT SEING TESTED 7 
BNE CONTMM : IF SO THEN GO TO CONTMM AND CONTINUE TESTING 
“MEMORY MANAGEMENT | 
001000 173454 BIT #1000, aSHR ;RELOCATION WANTED? 
BNE CKDONE ;BRANCH IF NO | 
000405 TSTB —s_ ABREL "1F THE PROGRAM HAS ALREADY BEEN RELOCATED THEN ALSO | 
BMI RELOER : PLACE THE PROGRAN BACK IN LOWER CORE 
000200 00405 MOVB #200, a#REL [OTHERWISE PREPARE TO RELOCATE 
/RELOCATE THE DIAGNOSTIC TO HIGHEST AVAILABLE MEMORY 
001554 JSR PC, PNTMES ; TYPE “"RELOC" | 
047514 000103 “ASC 12 ZRELOC/ 
EVEN 
000340 MOV DSMAXMEN., RS :PREPARE TO LOAD THE PROGRAM IN THE HIGHEST | 
SAVAILABLE MEMORY 
25. MoV ~ (RY), - (RS) “RELOCATE THE PROGRAM 
0004 36 CHP RW, BBEGIN-5O “NEITHER RELOCATE NOR TEST LOCATIONS LOWER THAN BEGIN-5SO 
HI 
o00050 JMP 50(RS) 
SHRELOCATE THE DIAGNOSTIC BACK TO LOWER MEMORY 
000346 RELOER: MOV DESAURS, RS ;RESTORE RS 
o00405 TSTB ss ABREL -1§ DIAGNOSTIC IN RELOCATED STATE? 
BPL CKDONE -BRANCH IF NO 
000430 MoV SBEGIN-SO.R4  ; PREPARE TO RELOCATE THE PROGRAM TO LOWER CORE 
25. MoV (R5)+, (RY)4 
000340 CMP RS, aMAXMEN 
BLO 2$ 
000405 CLRB  —s- ABREL 
000346 MoV RS, aSSAVRS /SAVE RS 
000500 MoV SBEGIN, SP RESET STACK TO LOWER MEMORY 
000350 MOV SP, aFSAURE :"BEGIN" USES THIS TO RESET THE STACK. 
005116 CKDONE: JMP DELOWER “TRANSFER THE PROGRAM CONTROL TO THE LOWER CORE 
000315 LOWER: TSTB agSAVKBB ;HERE DUE TO C TYPED? 
BNE STPSTK [BRANCH IF YES (TYPE ERROR STACK) 
001714 TSTMM: JSR PC, MEMNMNNG ; SET THE REGISTERS iF THE MEMORY MANAGEMENT 
; 1S AVAILABLE 
000276 TSTB = @#MMAVA > 1S MEM. MANAG. AVAILABLE ? 
BEG ENDPAS ; BRANCH IF NO 
BR SCNTMM “BEGIN TESTING ABOVE 28K 
002052 CONTMM: JSR PC, UPMN :GO TO UFDATE MEM. MANAG. REGISTERS 
000324 SCNTMM: MOV #LOWTHO, R3 /MAKE R3 POINT TO THE LOCATION LOWTWO 
002160 JSR PC, GETSIZ ; LOAD BITS 6-10 OF R2 WITH THE BITS 13-17 
[OF THE LOWEST ADDRESS UNDER TEST 
020000 MoV #20000, R4 “MAKE RY POINT TO THE LOWEST LOCATION IN THE BANK 
SPOINTED BY PAGE ADDRESS REGISTER 1 (PARI) 
172342 CMP R2, 98172342 -1$ THE CONTENT OF R2 LOWER THAN THE CONTENT OF 
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005164 
005166 


005170 
005174 
005200 


005204 
005210 
005212 
005216 
005222 
005224 


005230 
005232 


005236 
005242 
005244 
005246 
005250 
005254 


005256 
005260 
005262 
005264 
005270 
005272 
005276 


005300 


15-AUG-77 


103405 
050104 


162702 
004767 
004767 


004767 
010005 
004767 
004767 
010013 
000167 


010046 
012700 


162716 
050116 
020240 
001410 
020027 
101370 


005720 
021002 
003006 
012716 
012600 
062700 
000207 


022626 


15-AUG-77 
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000200 
001650 
002130 
000629 


002116 
000006 


174242 


172356 
020uU00 


172340 


157776 
000002 


12:37 PAGE 56 


PARITY OR RELOCATE? 


23: JSR 


;MAXADR - SUBROUTINE TO GET CURRENT 24K SLICE OF MEMORY ADDRESSES ABOVE 28K. 


>REGISTERS; 


;RO= ON ENTRY= #160000 AND ON EXIT=HIGHEST VIRTUAL ADDR. UNDER TEST 
*Ri= LOW ORDER 12 BITS OF VIRTUAL TEST ADDRESS 
;R2= PAR BLOCK NO. CURRENTLY UNDER TEST. 


MAXADR: MOV 


MOV 
;X*¥BEGIN LOOP TO FIND PAR ADDRESS UNDER TEST 


2$: SUB 
BIS 
CMP 
BEQ 
CMP 
BHI 
> XXEND LOOP 
TST 


CMP 
BGT 
MOV 
33: MOV 
ADD 
RTS 


4S: CMP 


2% 
R1i,R4 


#200,R2 
PC, MMREG 
PC,GETSIZ 


PC, MAXADR 
RO.RS 

PC,GETSIZ 
PC, MAXADR 


RO, (R3) 
CLRMEM 


RO, - (SP) 
#172356, RO 


#20000. (SP) 
Ri, (SP) 
RZ, - (RO) 


3$ 
RO, #172340 
2$ 


TO FIND PAR ADDRESS 
(RO)+ 
(RO).R2;>1S THE 
YS 


#157776, (SP) 
(SP )+,RO0 
#2,RO0 

PC 


(SP)+, (SP)+ 


EO a 


| 
SEQ 0056 | 


;PAR1 7? 

;1F SO THEN GO 2$ 
; SUBROUTINE GETSiZ LOADED R1 WITH BITS 0-12 
;O0F LOWADD WHICH HAVE NOW BEEN LOADED IN RY 


; SET MEM. MANAG. REGISTERS 
:PLACE BITS 13-17 OF HIGHEST LOCATION TO BE TESTED 
; IN BITS 6-10 OF RZ, #160000 IN RO AND BITS 0-12 


+OF LOCATION HIGHADD IN 


Ri 
; GET THE ADDRESS OF MAX. MEM. UNDER TEST 


+; PREPARE TO SET UP LOCATION MAXMEM 

; GET THE MAXIMUM ADDRESS OF AVAILABLE MEMORY 
;AND STORE INTO “MAXMEM" 

>GO TEST A 24K SLICE ABOVE 28K. 


;PUT MAXIMUM AVAILABLE ADDRESS ON STACK 
;RO=PAR7? UNIBUS ADDRESS 


;DECREMENT VIRTUAL ADDRESS BY 4K 

;SET BITS 11:0 TO MAXIMUM VIRTUAL TEST ADDRESS 
;DOES CURRENT PAR= TEST BLOCK NO. ? 
»BRANCH IF YES 

>ARE WE AT PARO? 

>NO KEEP TRYING 

UNDER TEST 

+SET TO PAR CURRENT 

PAR BLOCK UNDER TEST GTR THAN ALLOWED? 
;BRANCH IF YES (FALL INTO ENDPAS) 

>EX1T WITH MAXADR= 28K SEGMENT TEST SIZE 
;SET RO TO MAXIMUM VIRTUAL TEST ADDRESS 
>MAKE MAXIMUM MEMORY+2 

;AND EXIT MAXADR ROUTINE 


>FIXUP STACK 
>AND FALL THRU TO ENDPAS. 


——— eee eee = - oe 
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2645 
2646 
2647 
2648 
2649 
2650 
2651 
2652 
2653 
2654 
2655 
2656 
2657 
2658 
2659 
2660 
2661 
2662 
2663 
2664 
2665 
2666 
2667 
2668 
2669 
2670 
2671 
2672 
2673 
2674 
2675 
2676 
2677 
2678 
2679 
2680 
2681 
2682 
2683 
2684 
2685 
2686 
2687 
2688 
2689 
2690 
2691 
2692 
2693 


005302 
005310 
005312 


005316 


0052322 
005326 
005330 
005334 
005336 
005342 
005344 


005346 
005350 
005352 


005356 
005360 


005362 
005366 
005370 


005374 
005400 
005404 
005410 
005412 


005414 
005416 
005420 
005424 


0054 30 
0054 34 
0054 36 
005442 


032777 
001055 
012746 


012701 


012703 
005216 
020137 
103043 
112702 
105302 
C02766 


105721 
001774 
020227 


103404 
101026 


004767 
000404 
010237 


004767 
011637 
004767 
00504 3 
114113 


105021 
00504 3 
105237 
004767 


012703 
000742 
004767 
000756 


15-AUG- 77 


000020 
177777 
007744 
000376 
000310 
000022 


000020 


001012 
000312 
001214 


000312 
001210 


000314 
001330 


000376 
000762 


12: 


37 PAGE 57 
TYPE ROUTINE FOR ERROR STACK 


173140 ENDPAS: 


STPSTK: 


TYPSTK: 


RETSTK: 


FAILNM: 


PARFL: 


P 


+& TYPE ROUTINE FOR ERROR STACK 


THIS ROUTINE IS USED TO DETERMINE IF TYPE OUT OF THE ERROR STACK 
FOR ONLY THE FAILING BITS IS REQUIRED OR NOT 


#20, dSWR 
SEOP 
#-1,-(SP) 


RENDPRG, R1 
#376,R3 
(SP) 

Ri, dRENDSTK 


R 
TYPSTK 


(R1i)+ 
RETSTK 
RZ, #16. 


2$ 
PARFL 


PC, TPADER 
FAILNM 
RZ, d#DECWRD 


PC, TYPDEC 
(SP), d#DECWRD 
PC, STPDEC 
-(R3) 


(R1)+ 
-(R3) 
ae TYPCNT 
PC,RPTOCT 


#376,R3 
Re TSTK 
PC, TPPRER 
FAILNM 


*HAS THE END OF THE ERROR STACK BEEN REACHED ” 


> THEN GO TO TYPE END OF PASS 


16 BITS OF THIS BANK HAVE BEEN CHECKED. 
;BEEN CHECKED FOR ERROR THEN SEE IF THERE 

> 1S ANY MORE 4K MEMORY BANK 

>OTHERWISE CHECK THE BYTE STORED AT (R1) 

;1F IT 1S O WE WILL NOT TYPE IT 

> 1S THE POINTER POINTING TO ERROR STACK BYTE 
;MEANT FOR COLLECTING ADDRESS FAILURES FOR 
>THE SPECIFIC MEMORY BANK 

> 1F NOT THEN GO TO TYPE BIT NUMBER 

>1F 1T 1S POINTING TO THE STACK LOCATION INTENDED 
>TO COLLECT PARITY FAILURES THEN GO TO PARFL 
; OTHERWISE TYPE “ADDRESS ERROR" 


;PREPARE TO TYPE THE NUMBER OF THE FAILING BIT 
> IN DECIMAL 

;GO TO TYPE THE BIT NUMBER IN DECIMAL 

;PREPARE TO TYPE THE PAGE NUMBER 

> IN DECIMAL 


;PREPARE TO PRINTOUT THE NUMBER OF TIMES THIS 
>FARILURE OCCURED 
*CLEAR THE ERROR STACK 


>ENABLE THE TYPE OUT OF 1 WORDS 

; TYPE THE 4K BANK AND THE NUMBER OF TIMES 
> THIS FAILURE WAS SEEN 

>RESET SCRATCH STACK FOR EACH BIT PRINTED. 


>; TYPE “PAR ERR" 


SEQ 0057 


;ARE WE GOING TO TYPE THE ERROR STACK AND END OF PASS? 
;1F NOT THEN GO TO SEOP 

; THE PROGRAM HAS REACHED THE END AND ERROR 
;STACK AND END OF PASS WILL BE TYPED OUT 
;PLACE THE STARTING ADDRESS OF THE ERROR STACK 
+FOR O TO 4K MEMORY IN R1 


> 1F WE HAVE GONE THRU THE ENTIRE 
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2694 
2695 
2696 
2697 
2698 
2699 
2700 
2701 
2702 
2703 
2704 
2705 
2706 
2707 
2708 
2709 
2710 
2711 
2712 
2713 
2714 
2715 
2716 
2717 
2718 
2719 
2720 
2721 
2722 
2723 
2724 
2725 
2726 
2727 
2728 
2729 
2730 
2731 
2732 
2733 
2734 
2725 
2736 
2737 
2738 
2739 
2740 
2741 


005444 
005446 
005452 
005456 
005460 
005464 
005472 
005474 
005500 
005506 


005514 
005522 
005526 
005532 
005534 
005540 


005542 
005546 


005552 
005556 
005562 
005564 
005570 
005572 


005574 
005600 


005002 
004767 
105737 
001046 
005237 
032777 
001015 
004767 
047105 
051523 
005514 
013737 
004767 
013700 
001405 
004767 
000005 


0001 37 
000137 


004767 
013704 
014445 
0204 37 
101374 
000207 


004767 
000167 
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002036 
000315 


000406 
000040 


001064 
020104 
021440 
000406 
001072 
000042 


000uU12 


000156 
600250 


001632 
000344 


000210 


177752 
000402 


15-AUG-77 
6 


172756 


049520 
000 


NO0C312 


SEOP: 


TYPEOP: 


ACT11: 


>& SERVICE XXDP/ 
JMP 


SDOAGN: 
RLODER: 
4S: 


12:37 PAGE 58 
END OF PASS 


/*% END OF PASS 


JMP 


JSR 
MOV 
MOV 
CMP 
BHI 
RTS 


TYPE "END PASS" AND DISABLE PARITY. 
ALSO SERVICE ACT1I1. 
AND EVERY CONSECUTIVE PASSES UNLESS BIT 4 OF SSWREG IS HIGH 


RZ 

PC, PARITY 
ad SAVKBB 
CTLC 


@RSPASS 


#40, dSWR 
ACT11 

PC, TPCRLF 
7END PASS #7 


dR SPASS, dFDECWRD 


PC, STPDEC 
a#42Z,RO0 
SDOAGN 
PC,RLODER 
; RETURN 


ACT11 
d* SENDAD 


ORRESTRT 


PC, CLRMM 

d* SAVRY, RY 

~(R4),-(R5) 
R4, dRENOSTK 
4% 

PC 


;CONTROL C HANDLER 


CTLC: 


JSR 
JMP 


PC,RLODER 
APTHLT 


;SET RZ2= PARITY MODULE DISABLE CODE 

;GO DISABLE PARITY MODULES IF SELECTED. 
+CONTROL-C TYPED? 

;BRANCH IF YES-RESTORE LOADERS AND HALT- 
; INCREMENT PASS COUNT 

>"END PASS #XX" PRINTOUT WANTED? 
>BRANCH IF NO 

>; TYPE CR, LF. AND “END PASS #" 


;GET PASS COUNT 
> TYPE IT 
;GET THE MONITOR ADDRESS 
; IF NONE 
;RESTORE XXDP MONITOR 
TO ACT11 MONITOR. 


; JUMP TO ACT SERVICE 
;REPEAT TEST IF NOT UNDER ACT11/7XXDP 
>STOP MEMORY MANAGEMENT SO CAN RESTORE LOADERS 


;RESTORE RY WITH SAVRY 
>RESTORE LOADERS 


;RETURN FROM RLODER CALL 


;RESTORE ABS LOADER 
> 1F NOT APT HALT AT FATHLT 


SEQ 0058 
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2742 
2743 
2744 
Z2745 
2746 
2747 
2748 
2749 
2750 
2751 
2752 
2753 
2754 
2755 
2756 
2757 
2758 
2759 
2760 
2761 
2762 
2763 
2764 
2765 
2766 
2767 
2768 
2769 
2770 
2771 
2772 
2773 
2774 
2775 
2776 
2777 
2778 
2779 
2780 
2781 
2782 
2783 
2784 
2785 
2786 
2787 
2788 
2789 
2790 
2791 
2792 
2793 
2794 
2795 
2796 
2797 


005604 
005612 
005614 


005616 
005620 
005624 
005630 


005634 
005636 
005642 
005646 
005650 
005654 
005660 
005662 
005664 
005666 
005672 
005674 
005700 
005702 
005706 
005710 
005714 
005716 
005720 


005722 
005726 
005732 
005734 
005736 
005742 
005744 
005746 
005750 
005752 
005756 
005760 
005762 
005766 
005770 
005776 


017637 
010346 
010046 


010103 
004767 
013703 
110337 


C10346 
012703 
013743 
005043 
113713 
016643 
011143 
010043 
005043 
016313 
040013 
046300 
050013 
012700 
060700 
062700 
005316 
002374 
005726 


105037 
105737 
001097 
105720 
105737 
001003 
105720 
005713 
100015 
122710 
001401 
105210 
122710 
001404 
032777 
001002 


15-AUG-77 
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ERROR HANDLING ROUTINE 
*% ERROR HANDLING ROUTINE 


000000 000402 oa 
13: 


001604 
000312 
000403 


000376 
000306 


000402 
00C006 


000004 
000004 


000022 


000277 


000300 


000301 


000377 


000001 
000400 


172452 


; SETUP BANK 


29: 


6S: 


ERRTYP: 
1%: 


MOV 
JSR 
MOV 
MOVB 


TSTB 


NO. 


ee em + ee ee - - e ee eee eee 


PROGRAM COMES HERE EACH TIME AN ERRCR !S ENCOUNTERED THIS 
ROUTINE TYPES OUT THE ERROR MESSAGE IN THE FORMAT GIVEN EARLIER 


a(SP),d#SFATAL ;LOAD THE LOCATION SFATAL WITH THE ERROR NUMBER 
R3,- (SP) ;SAVE R3 

RO, - (SP) ;AND RO ON THE STACK 

IN FATAL FOR APT 

R1,R3 ;GET VIRTUAL ADDRESS UNDER TEST FOR GETBNK 
PC, GETBNK ;GET BANK NO. UNDER TEST INTO PBNK 

OR PBNK,R3 ;GET BANK UNDER TEST 

R3, d#SFATAL +1 ;STORE FAILING BANK NO. FOR APT 

R3,-(SP) > TEMPORARILY STORE R3 

#376,R3 ;MAKE R3 AS THE STACK FOINTER 

ap A ata ;OUTPUT THE WORD STORED AT 

-(RS) 

@*SFATAL, (R3) ;PUT ERROR NO. ON ERROR STACK 
6(SP),-(R3) ;PLACE THE RETURN PC AT (R32) 

(R1),-(R3) ;PLACE BAD DATA. 

RO, -(R3) ;AND GOOD DATA ON THE STACK 

-(R3) 

4Y(R3), (RI) > TAKE THE 

RO, (R3) ;EXCLUSIVE OR OF GOOD AND BAD DATA 
YC(R3),RO ;TO FIND THE BITS THAT FAILED. 

RO, (R3) ;AND PLACE IT ON THE STACK 
RENDPRG-. -24. .RO; THIS CODE BRINGS THE RELATIVE ADDRESS 
PC,RO ;OF THE STARTING OF THE ERROR STACK 
#18.,.R0 >FOR THE SFECIFIC 4K BANK 

(SP) 

6$ 

(SP )+ >;RESTORE THE STACK POINTER 

ae TYPENB ;DISABLE ANY TYPE OUT 

ae SPRERR > IF THIS IS PARITY PROBLEM 

34 > THEN GO TO 39% 

(RO)+ ; OTHERWISE INCREMENT THE ERROR STACK POINTER BY 1 
d* SADERR > 1F THIS |S ADDRESSING PROBLEM 

34 > THEN GO TO 3% 

(RO)+ ; INCREMENT THE POINTER RO BY 1 

(R3) >1S BIT 15 OF (R3) SET? 

4% > 1F NOT THEN GO TO 4§ 

#377, (RO) ; OTHERWISE SEE iF THIS ERROR HAS OCCURED 377 TIMES 
5$ > 1F SO DON'T BUMP ERROR COUNT 

(RO) ; INCREMENT THE ERROR COUNTER BY 1 

#1, (RO) >MORE THAN 1 ERROR OCCURRED ON THIS BIT? 
7$ ;BRANCH IF NO 

#400, dSWR ;STOP ERROR PRINTOUT AFTER 1 WANTED? 

4S >BRANCH IF YES ‘DON'T TYPE ERROR: 


SEQ 0059 | 


DZKNA 


MACYi1 30(104%6) 


DZ2KMPD. P11 


006000 
006004 
006010 
006012 
006016 
006020 
006024 
006026 
006032 
006034 
006036 
006040 
006042 


006050 
006054 


006060 
006064 
006066 
006070 
006074 
006076 
006104 


006106 
006110 


006114 


006116 


006122 
006126 


006130 


006132 
006134 
006140 


006142 
006142 
006146 
006154 


006156 
006164 
006170 
006174 


105237 
105737 
001411 
004767 
000411 
105737 
001403 
004767 
000403 
105720 
006313 
001342 
112737 


004767 
004767 


005037 
012600 
C12603 
105737 
001404 
012737 
000443 


010246 
005777 


100405 


004767 


105737 
001401 


000000 


012602 
062716 
000297 


004767 
051105 
00004 3 


017637 
105237 
012703 
013743 


15-AUG-77 12: 36 


15-AUG-77 12:37 PAGE 

000277 7$: 
000300 4S: 
000406 
000301 
000346 

6S: 
000006 000214 &%: 
001150 
000622 
000300 10S: 
0004 20 FNDERR: 
n00c01i 4900400 

2$ 
172334 
001546 
000042 ’%: 

4S: 

6S: 
000002 

FATERR: 
000416 SEQERR 
047522 020122 
000000 000402 
000314 
000376 
N00402 


60 
ERROR HANDLING ROUTINE 


de TYPENB 
OFSPRERR 


6$ 

PC, TPPRER 
8$ 

dF SADERR 
6$ 

PC, TPADERR 
8$ 


(RO)+ 
(R3) 


2$ 
#6, 08 TYPCNT 
PC, PUTADR 
PC, TYPERR 


De SPRERR 
(SP )+,R0 
(SP)+,R3 

ae SENV 

2$ 

#1, a8 SMSGTY 
FATHLT 


R2,- (SP) 
ASWR 


BM! 4% 
CHECK FOR CONTROL-C KEY 


JSR 


TSTB 
BEG 


HALT 


MoV 
ADC 
RTS 


JSR 
-ASCIZ 


_ EVEN 


MOV 
INCB 
MOV 
MoV 


PC, CHECKC 


a#42 
6$ 


(SP i+,R2 
ao, (SP) 
Pe 


PC. TPCRLF 
7ERROR &/ 


a( SP). d&SFATAL 


ae TYPCNT 
#376,R3 


OeSFATAL. -( RS) 


;ENABLE THE TYPE OUT ROUTINE 

;PARITY ERROR? 

;BRANCH IF NO 

;ELSE TYPE “PAR ERR" 

;AND DON'T TEST INDIVIDUAL BIT FAILURES. 
*ADDRESS ERROR? 

*>BRANCH IF NO 

>PRINT "ADR ERR” 


;POINT TC NEXT ENTRY IN ERROR STACK 

>; 1S THERE STILL AN ERROR BIT SET IN ERROR. 

;BR IF YES - KEEP FILLING ERROR STACK 

>TELL TYPOCT TO TYPE & WORDS OF ERROR STACK. 
>THE STACK POINTED BY R3 

;GO TO THE SUBROUTINE TO PLACE THE ADDRESS IN R1 
;AT LOCATIONS (R3) AND (R3-2) 

; TYPE ERROR STACK (7 WORDS) 


; CLEAR ADDRESS/PARITY ERROR FLAGS 
>;RESTORE RO 

;AND R3 

; ARE WE RUNNING UNDER APT? 

; 1F NOT THEN TEST FOR HALT 
;QTHERWISE INFORM THE APT 

;GOTO FATHLT AND WAIT FOR APT 


; SAVE R2 TEMP 

;DOES THE OPERATOR REQUIRE THE PROGRAM TO HALT 
>ON ERROR 

> 1F SO THEN HALT ON ERROR 


> 1F CONTROL-C TYPED THEN PRINT ERROR HISTORY 
» AND HALT AT FATHLT. 

>ARE WE RUNNING UNDER ACT”? 

>BRANCH IF NO 


;PROGRAM HAS HALTED ON ERROR. R1 1S POINTING 
>TO A LOCATION WHICH SHOULD HAVE CONTAINED 
>THE WORD STORED IN RO 

RESTORE RZ 

-RESTORE THE RETURN ADDRESS 

~RETURN FROM THE SUBROUTINE 


TYPE “ERROR &” 


>LOAD THE LOCATION SFATAL W'TH THE EPROP NUMBER 
TELL STPNUM TO TYPE 1 WOPD 

/STPNUM USES P3 AS STACK 

/PUT ERROR NO ON STACK 


A ET ee em ew 


SEQ 0060 


DZ2KNA 


MACY11 30(1046) 


DZKMRD. P11 


006200 


006216 


G06222 
006226 
006232 


006236 
006242 
006246 
006252 


006256 
006260 
006262 
006264 
006266 
006270 
006272 
006274 
006300 
006302 
006306 
006310 
006314 
006316 
006320 
006322 
006324 
006326 
006332 
006336 
006342 


006344 
006350 
006354 
006360 


005743 
004767 
105737 
001326 
000000 
000137 


012637 
011637 
013706 


010067 
010167 
013701 
012700 


005701 
001442 
000241 
006001 
103005 
005710 
100406 
020027 
002032 
062700 
000766 
042710 
011091 
006101 
0061061 
006101 
006101 
042701 
105237 
004767 
000050 


016700 
016701 
013746 
013746 


15-AUG-77 
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000562 
0004 20 


000250 


000356 
000.60 
000350 


000132 
000: 30 
000352 
172100 


172136 
900062 
100000 


000777 
000300 
177242 


000024 
000022 
200360 
000356 


12:37 PAGE 


Sc a ee a ee _——= 


61 
ERROR HANDLING ROUTINE 


AP THLT: 
FATHLT: 


iaameasas 


-(R3) *STPNUM REQUIRES THIS 

PC, FATYP TYPE ERROR NO. 

O#SENV {RUNNING UNDER APT? 

FNDERR +BRANCH IF YES 
;FATAL ERROR OR C HALT. 

OFRESTRT ;RESTART TST SUT DON'T CLEAR PASS COUNT 
> IN CASE C RESTART. 


PARITY TRAP HANDLER 
COME HERE FROM A TRAP TO 114. 
THIS ROUTINE SEARCHES THE AVAILABLE PARITY MODULES AND IF ONE 
; HAS A PARITY ERROR BIT SET THE GET THE PARITY ERROR ADDRESS 
; AND CALL THE “ERROR” ROUTINE TO PRINT ERROR MESSAGE. 
/1F NO PARITY ERROR BITS CAN BE FOUND A FATAL ERROR !S DONE. 


REGISTER US AGE. 
-RO= HOLDS PARITY MODULE ADDRESSES 


Riz GETS ERROR ADDRESS FOR 


PAPERR: MOV 
MOV 
MOV 


mow 
mov 
May 
MO\ 


TSt 
BEG 
CLC 
1$ ROR 


"ERROR" CALL. 
(SP)+,@8PARSP ;SET PAPSP TO RETURN ADDRESS 
(SP). @ePARPS > SAVE PSW FOR RETURN 
a8 SAVURG. SP >AND RESET THE SP SINCE NOT ENOUGH STACK ROOM 
>TO COMPLETE THE ERROR SERVICE ROUTINE. 
RO, SAVRO > SAVE RO DURING PARITY SERVICE 
R1, SAVRI ;SAVE R1 DURING PARITY SERVICE 


/GET PARITY AVAILABLE MAP 
>RO= FIRST PARITY ADDRESS. 


ae PARMAP, Ri 
#172100, RO 


| ; ANY PARITY MODULES AVAILABLE” 

4% ;>BR 1F NO -FATAL ERROR- 

Ri ‘SHIFT PARITY MAP BIT INTO C BIT 

2$ >BRANCH IF THIS PARITY MODULE NOT AVAILABLE 
(RO) ;PARITY MODULE ERROR BIT SET? 


3$ ;BRANCH IF YES -CALL “ERROR” ROUTINE 
RO, #172136 >DONE ALL PARITY MODULES? 
4S /BR IF YES- GO TO FATAL ERROR CALL- 


#2-P0 -POINT TO NEXT PARITY ADDRESS 

1$ » AND KEEP TRYING 

#iC0000. «R0) /CLEAR PARITY ERROR BIT. 

(RQ). PI >GET PARITY MODULE CSP 

R 1 /-SHIFT ERROR ADDRESS BITS 11-5 INTO 16-9 

R 1 

R} 

R | 

#777,R1 .SAVE EPROP ADDRESS ONLY 

dF SPRERR -TELL “ERROR” PARITY ERROR CALL 

PC. ERROR »SERRORE REPORT EPROP MESSAGE 
/HERETTERROR NUMBEP SUdaeess 

SAVRO. RO RESTORE RO 

SAVRILRI RESTORE Pi 


-SET RETURN PSW ON STACE 
AND SET RETURN RODRPESS ON STRCe 


@SPARPS. -(SP) 
@ePARSP. -«SP) 


SEQ 0061 





DZKNA 
DZ2KMPD. P11 


2910 


MACY11 30°1046) 
15-AUG-77 12: 36 


006364 


006366 
006366 
006372 


006374 
006376 


006400 
006404 
006406 
006412 
006420 


006422 


0064 24 
0064 30 
0064 32 
0064 36 
006444 


006446 


000002 


004767 
000051 


000000 
000000 


105737 
001406 
004767 
042101 
000122 


C00207 


105737 
001406 
004767 
040520 
000122 


00020" 


15-AUG-77 


177550 


000277 


000160 
020122 


000277 


000i 74 
O2Cize 


051105 


12:37 PAGE 62 


ERROR HANDLING ROUTINE 
RTI *RETURN TO TEST WHERE PARITY TRAP OCCURRED. 

COME HERE IF NO PARITY ERROR FLAG FOUND SET 

i JSR PC, FATERR ;¥ERRORX REPORT ERROR MESSAGE AND HALT AT FATHLT 
51 ;XXKRERROR NUMBER Sidecars 


-RO+R1 ARE SAVED HERE FOR PARITY TRAP DUE TO INSUFFICIENT 
STACK SPACE BETWEEN 500-450. 


SAYRO. 10 ;SAVE RO DURING PARITY TRAP SERVICE 
SAVRi: 4 SAVE R1 DURING PARITY TRAP SERVICE 
TPACER. TSTB ae TYPENE ; TYPE ERROR? 
BEG 1$ » BRANCH iF NO 
JSR PC. PNTMES » TYPE CR. LF AND “ADR ER” 
-ASCIZ /AOR ERR’ 
EVEN 
1$ PTS PC 
TPPPER TSTE ae TVPENB -ERROP PRINTOUTS ALLOWED? 
BEG 1$ ;BRANCH IF NO 
JSR PC. PNTMES .GO TO TYPE CR. LF AND “PAR ERP” 
ASCiZ /PAP ERR’ 
EVEN 
1¢ PT: PC 


A OG LN SG A tt ON 


SEQ 0062 


— ree tee ome 





DZKMA 
DZKMPD. P11 


2939 
2940 
2941 
2942 
2943 


MACY11 30(104%6) 
15-AUG-77 i2:3 


006450 
006452 
006456 
006460 
006462 
006464 
006466 
006470 
006474 
006476 
006500 
006504 
006506 
006510 
06512 
006516 
006522 
CS6524 


006526 
0065 34 
006526 
006542 
006544 
006550 


006552 
006556 


006562 


006564 
006570 


006572 
006600 
006602 
006610 
006612 


010146 
616601 
105721 
001376 
000412 
010146 
010046 
016601 
112100 
001403 
004767 
000773 
C12600 
005201 
042701 
010166 
012601 
000416 
132737 
001005 
105737 
100375 
110037 
000404 


004767 
005015 
006562 
000207 


004767 
000735 


032777 
001323 
123737 
001717 
000764 


000002 


000004 


000022 


000091 
000002 


000040 
177564 
177566 


177706 


G00 


177762 


000020 
000042 


15-AUG- 77 
6 


N00421 


171650 
N00046 


NOTYP. 
4S: 


4S. 
RETTYP: 


STPCHR: 


cS: 


4S: 
PCRLF.: 


EXTYP: 


TPCRLF: 


PNTMES: 


12:37 PAGE 63 
TYPE OUT ROUTINE 


>* TYPE OUT ROUTINE 


THIS ROUTINE 1S USED BY THE PROGRAM TC TYPE OUT ANY CHARACTER 


R1,- (SP) 

Z2(SP),R1 

(R1)+ > 1F THIS TYPE OUT HAS BEEN SUPRESSED THEN 
4§ ;PREPRRE TO RETURN 

RETTYP 

R1i,-(SP) ; SAVE R1 

RO, -(SP) ;AND RO ON THE STACK 

4Y(SP),R1 ;PLACE THE ADDRESS OF MESSAGE TO BE TYPED IN R1 
(R1)+,RO ;PLACE THE BYTE TO BE TYPED IN RO 

4§ > 1F tT 1S END OF MESSAGE THEN GO TO 4$ 
PC. STPCHR > OTHERWISE GO TO TYPE THE CONTENTS OF RO 
2$ 

(SP)+,R0 ;RESTORE RO 

R1 ; CAUSE P1 TO 

#1,R1 *POINT TO EVEN ADDRESS 

R1,2¢SP) ;MODIFY THE RETURN ADDRESS 

(SP)+,R1 >RESTORE R1 

EXTYP ;AND RETURN VIA RTS PC 

#40, d#SENUT ;HAYE TYPE OUTS BEEN DISABLED”? 

4S -1F SO THEN RETURN FROM THE SUBROUTINE 
aRSTPS ,WAIT HERE 

2$ >UNTIL THE PRINTER IS READY 

RO, d#STPB >LOAD DATF TO BE TYPED INTO DATA REG. 
EXTYP >RETURN 

PC, STYPE 

(16><12> » CR/LF 

PC >RETURN 

PC, PCRLF > TYPE CR/LF 

STYPE ;NOW GO TO TYPE THE REST OF THE MESSAGE 
#20, dSWR >PRINTOUTS ALLOWED? 

NOTYP ;BRANCH !F NO 

0842, DELO >RUNNING UNDER ACT 11? 

NOTYP >BRANCH IF YES -NOT PRINTOUT- 

TPCRLF ;SEND CR/LF AND TYPE MESSAGE. 


SEQ 0063 


SS TT LS eT Se Gm ee em mm mm ee mmm mm we mee me 


ee 


nh 5 


ot 

DZKMA MACY11 30(1046) 15-AUG-77 12:37 PAGE 64 | 
DZKHAD.P11.  15-AUG-77 12: 36 ROUTINE TO TYPE OUT A DECIMAL NUMBER SEQ 0064 

2987 

2988 ;% ROUTINE TO TYPE OUT A DECIMAL NUMBER | 

2989 sth qxanamnenitantimamtenenamenmanaemtimants 

2990 ;x 

2991 % THIS ROUTINE 1S USED TO CONVERT THE CONTENTS OF LOCATION 

2992 i DECWRD TO DECIMAL NUMBERS AND TYPE THEN FOLLOWING 3 SPACES 

2994 | 

2995 006614 004767 177732 TYPDEC: JSR —s- PC PCRLF TYPE CR/LF | 

2997 006620 O05046 STPDEC: CLR -(SP) 

2998 006622 013746 000312 MOV «so @BDECWRD.-(SP) GET THE WORD THAT HAS TO BE CONVERTED TO A 

2999 ;DECIMAL NUMBER 

3000 006626 162716 000012 25: SUB #10., (SP) : 

3001 006632 002403 BLT ~—s«wsS iF THE NUMBER IN (SP) WAS LESS THAN 10 THEN 

; yy 

3003 006634 005266 000002 INC 2(SP) “OTHERWISE ADD 1 TO THE LOCATION STORING 10'S DIGIT 

3004 06640 000772 BR 25 [AND RETURN TO 2S 

3005 006642 062716 000012 4S: ADD —s-:*#10., (SP) 

3006 006646 052716 oon060 BIS «#60, (SP) :MAKE THE CONTENTS OF (SP) A DECIMAL NUMBER 

3007 006652 112667 000020 MOVB (SP) +, 6$-2 “PLACE THE 1'S DIGIT TO BE TYPED 

3008 006656 052716 000060 BIS #60, (SP) “MAKE THE CONTENTS OF (SP) A DECIMAL NUMBER 

3009 006662 112667 000007 MOVB =: (SP) +, 68-3 “PLACE THE 10'S DIGIT TO BE TYPED 

3010 006666 004767 177572 JSR PC, $TYPE G0 TO TYPE THE NUMBER IN DECIMAL FOLLOWED BY 

11 : 

2012 006672 O20040 ozco40 xoDNcEO -asciz 7 007 

3013 EVEN 

3014 006700 000207 6S: RTS —s PC RETURN FROM THE SUBROUTINE 


DZKNA 
DZKMAD 


3015 
3016 


MACY11 30(1046) 


Pil 15-AUG-77 12: 36 


006702 
006710 
006712 
006716 
006722 
006724 


006726 
006730 
006734 
006740 
006742 
006744 
006746 
006750 
006752 
006754 
006756 
006760 
006764 


006770 
006772 
006776 
007000 
007002 
007004 
007010 
007014 
007016 
007020 
007022 
007024 
007026 
007032 
007034 
007040 
007042 


032777 
001054 
004767 
004767 
000447 
012123 


012113 
105237 
052743 
106113 
103376 
005000 
106113 
006100 
106113 
006100 
000405 
004767 
020040 


005000 
012723 
000241 
006113 
006100 
052700 
004767 
005000 
006113 
006100 
006113 
006100 
105363 
001361 
105337 
001347 
000207 


15-AUG-77 


020000 


177634 
000012 


000314 
000004 


i 77500 
000040 


000006 


000060 
177512 


177776 
000314 


171540 TYPERR: 


OCTTYP: 


TYPOCT: 
23: 


RPTOCT: 


FATYP: 


STPNUNM: 


4S: 


OC TXT: 


12:37 PAGE 65 
OCTAL TYPE 


Be Ve Ve Be Ve Be Be Be Be Be Be Be 
PE DE PE FE FE DE FE FE FE FE FE DE 


OUT ROUTINE 


THIS ROUTINE 


OCTAL TYPE OUT ROUTINE 


1S USEO TO TYPE OUT THE OCTAL VALUES 


CONTROL SHOULD COME TO THIS ROUTINE WITH R3 POINTING TO 
THE LOW ORDER BITS (I.E. BITS 0-15) OF THE ADDRESS TO 

BE TYPED WHERE AS R3-Z2 SHOULD CONTAIN THE HIGH ORDER BITS 
(1.€. BITS 16 & 17). CONTENTS OF LOCATION R3-1 AND RO ARE 
DESTROYED BY THIS SUBROUTINE 

BYTE TYPCNT SHOULD BE SET TO THE NUMBER OF WORDS THAT HAVE 


TO BE TYPED. 


#Z0000, dSWR 
OCTXT 


PC, PCRLF 
PC, TYPOCT 
OCTXT 


(R1)4, (R3)+ 
(R1)+, (R3) 


ae TYPCNT 


STPNUM 
PC, STYPE 
f.—# 


RO 
#6, (R3)+ 


(R3) 

RO 

#60, ROG 
PC, STPCHR 
RO 


(R3) 
RO 
(RS) 


RO 
~Z2(R3) 
4% 

ae TYPCNT 
RPTOCT 
PC 


;ERROR PRINTOUT WANTED? 

+>BRANCH IF NO 

; TYPE CR/LF 

> TYPE OCTAL NO. 

;RETURN VIA RTS PC 

>PLACE THE HIGH ORDER BITS AT LOCATION POINTED 


;BY RZ 
;AND NOW PLACE THE LOW ORDER BITS 
>;ENABLE THE TYPE OUT OF ONE OCTAL WORD 


*GET BITS 17 & 16 INTO RO 


+ TYPE 3 SPACES 


+ENABLE THE TYPE OUT OF 6 OCTAL DIGITS 


*PLACE THE CARRY FROM (R3) IN RO 
*OR THE CONTENTS OF RO WITH AN ASCII! O 
+ TYPE THE OCTAL NUMBER STORED IN RO 


*PLACE THE CARRY FROM (R3) IN RO 


*PLACE THE CARRY FROM (R3) IN RO 

> 1F WE HAVEN'T TYPED THE 6 OCTAL DIGITS 
+ THEN REFEAT FROM 4S 

7 1F ALL THE WORDS REQUIRED HAVE NOT BEEN 
> TYPED THEN REPEAT FROM RPTOCT 


SEQ 0065 


DZKNA 


MACY11 30(104%6) 


DZKMAD. P11 


007044 
007050 


007054 
007062 
007064 
007070 
007074 
007100 
007104 


007110 
007114 
007116 
007122 
007124 
007130 
007132 
007136 
007142 
007146 
007152 
007154 
007160 
007162 
007166 


007170 
007172 
007176 
007204 


007206 
007212 


007214 


007216 
007222 


15-AUG-77 


012702 
105037 


032777 
001441 
012700 
012720 
012710 
005037 
105237 


012701 
005021 
062702 
010221 
020127 
103772 
012711 
012701 
012721 
020127 
101773 
005237 
005010 
012740 
000207 


022626 
004767 
047516 

000 
007206 
004767 
000052 


000761 


013702 
000712 


15-AUG-77 


12: 36 


001409 
000276 


010000 
000004 
007170 
000340 
177572 
000276 
172340 
000200 
172356 
00700 
172300 
077406 
172316 
177572 


000104 


177366 


046440 


176730 


172354 


171366 


043516 


MEMMNG: 
NMREG: 


23: 


4S: 


SRE TMM: 


RE TMM: 
NOMM: 


UPMNM: 


12:37 PAGE 66 
SUBROUTINE FOR MEMORY MANAGEMENT 


B 6 


+ ROUTINE TO SET UP MEMORY MANAGEMENT REGISTERS 


MOV 
CLRB 


PROGRAM CONTROL COMES HERE TO DETERMINE IF THE MEMORY MANAGEMENT 
IS AVAILABLE OR NOT, AND IF IT IS AVAILABLE THEN WHETHER 
THE MEMORY ABOVE 28K 1S REQUIRED TO BE TESTED OR NOT. 


#1400, R2 
de MMAVA 


#10000, dSWR 
RE TMM 


#4,R0 
RNOMM, (RO) + 
#340, (RO) 
d#SRO 

ae MMAVA 


#172340, R1 
(R1)+ 
#200, R2 
RZ, (R1)+ 
R1,#172356 
23 


#7600, (R1) 
#172300, R1 
#77406, (R1)+ 
R1,#172316 
4% 

d# SRO 

(RO) 
#BUSER, - (RO) 
PC 


(SP )+, (SP )+ 


PC, TPCRLF 
/NO MNG/ 


PC, FATERR 
SRE TMM 


d#172354,R2 
MMREG 


;CLEAR THE BYTE THAT IS SUPPOSED TO INDICATE 
; THAT MEM. MANAG. 1S AVAILABLE FOR TESTING 
;HAS THE OPERATOR ASKED TO CHECK MEMORY MANAG. 7? 
;1F NOT THEN RETURN FROM THE SUBROUT!NE 
;PREPARE TO SETUP TIME OUT VECTOR 
;RETURN ADDRESS TO NOMM 

;AND WITH A PSW OF 340 

>TRY TO REACH MEM. MANAG. SRO 

ven 1S AVAILABLE THEN SET MEM. MANAG. AVAILABLE 
>BY 

*R1 1S POINTING TO PARO 
*;PARO WILL POINT TO BANK Q 


;SETUP PAR1-PAR6 


;PAR7 |S POINTING TO THE 170 PAGE 
>SETUP PDRO-PDR7 


*ENABLE MEM. MANAG. 
;RESTORE TIME OUT TRAP VECTOR FOR ANY FUTURE TRAP 


>RESTORE STACK POINTER 
; TYPE “NO MEMORY MANAGEMENT MESSAGE 


;XERRORX REPORT ERROR MESSAGE AND HALT AT FATHLT 
; XXXXXKERROR NUMBER S2XXXxKX 


>; RESTORE TIME OUT TRAP VECTOR 
;PREPARE TO UPDATE MEMORY MANAG. REGISTERS 


SEQ 0066 


—_— 
ee 
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DZKMPD. P11 15-AUG-77 12: 36 18 81T ADDRESS GENERATOR SEQ 0067 
3116 
3117 +x 18 BIT ADDRESS GENERATOR 
3118 SD ee 
3119 78 
3120 58 THIS SUBROUTINE 1S USED TO PLACE THE ADDRESS STORED IN Ri 
3121 >g IN THE LOCATION POINTED BY R3. THE ADDRESS IN R1 IS CONVERTED 
3122 ;x TO AN 18 BIT ADDRESS ONLY IF MEM. MANAG. IS AVILABLE IN WHICH 
3123 ;x CASE THE HIGH ORDER BITS OF THE ADDRESS ARE PLACED iN LOCATION 
3124 ;x POINTED BY R3-2 
3125 ;x 
3126 
3127 007224 005063 177776 PUTADR: CLR -2(R3) 
3128 007230 010113 MOV Ri, (R3) ;PLACE THE ADDRESS STORED IN R1 IN LOCATION (R3) 
2129 007232 105737 000276 TSTB ae MMNAVA ;1S THE MEM. MANAG. AVAILABLE 7? 
3130 007236 001425 BEQ 65 ; 1F NOT THEN RETURN FROM THE SUBROUTINE 
3131 007240 010146 MOV Ri.- (SP) ;SAVE R1 
3132 007242 042701 017777 BIC #17777,R1 ;CLEAR BITS 0-12 OF THE ADDRESS IN R1 
3133 007246 040113 BIC Ri, (R3) ; LEAVE BITS 0-12 OF THE ADDRESS IN (R3) 
3134 007250 052701 004000 BIS #4000, R1 ;PREPARE TO SHIFT R1 BY 12 PLACES 
3135 007254 006001 23: ROR R1 
3136 007256 103376 BCC 23 ;GET THE NUMBER OF PAR IN Ri 
3137 007260 062701 172340 ADD #172340,R1 ;GET THE ADDRESS OF PAR IN Ri 
3138 007264 011101 MOV (R1),R1 ;LOAD R1 WITH THE CONTENTS OF PAR 
3139 007266 052701 010000 BIS #10000, R1 
3140 007272 006101 4S: ROL R1 
3141 007274 103376 BCC 4% ;PLACE THE ADDRESS BITS 13-17 IN BITS 11-15 OF R1 
3142 067276 006101 ROL R1 
3143 067300 006143 ROL -(R3) ;PLACE BIT 17 IN LOCATION POINTED BY R3-2 
3144 007302 006101 ROL R1 
3145 007304 006123 ROL (R3)+ ;PLACE BIT 16 OF THE ADDRESS 
3146 007306 050113 Bis Ri, (RZ) ;PLACE BITS 13-15 OF THE ADDRESS IN LOCATION (R3) 
3147 007310 012601 MOV (SP)+,R1 >;RESTORE R1 
3148 007212 000207 6S: RTS PC ;RETURN FROM THE SUBROUTINE 
3149 
3150 ;* GET ADDRESS FROM THE APT MAILBOX 
3151 ,E cccccwcccccesocecescesesoeseseso= 
3152 ;x 
3153 ;x THIS SUBROUTINE IS USED TO GET ADDRESS FROM APT MAILBOX AND 
3154 ;x PLACE IT IN THE LOCATION USED BY THE PROGRAM TO DEFINE THE 
3155 ;% MEMORY BOUNDRIES. 
3156 ;x PROGRAM CONTROL SHOULD COME TO THIS SUBROUTINE WITH R1 POINT- 
3157 ;x ING TO THE MEMORY TYPE IN THE APT MAILBOX AND R3 POINTING TO 
3158 49 THE LOCATION+2 WHERE THE LOW ORDER BITS OF THE ADDRESS HAVE 
3159 ;x TO BE PLACED 
for : x 

161 

3162 007314 016143 000001 GETADR: MOV 1(R1),-CR3) ;PLACE THE LOW ORDER BITS OF THE ADDRESS 
3163 007320 005043 CLR -(R3) >;CLEAR THE LOCATION WHERE THE H!GH ORDER BITS 
3164 ;HAVE TO BE PLACED 
3165 007322 116113 177777 MOVB -1(R1), (R3) ;PLACE BITS 16 & 17 
3166 007326 000207 25. RTS PC ;RETURN FROM THE SUBROUTINE 


—_ << ee 
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3167 
3168 
3169 
3170 
3171 
3172 
3173 
3174 
3175 
3176 
3177 
3178 
3179 
3180 
3181 
3182 
3183 
3184 
3185 
3186 
3187 
3188 
3189 
3190 
3191 
3192 


3207 
3208 


3213 
3214 


3222 


007330 


007334 
007336 
007340 
007344 
067350 
007352 
007354 
007356 
007362 
007364 
007370 
007374 
007376 
007400 
007404 
007406 


007410 
007414 
007416 
007422 
007426 


007430 
007432 
007434 
007440 


105237 


012301 
011302 
042702 
052702 
006001 
006002 
103375 
105737 
001405 
105037 
052702 
000765 
012301 
012700 
040001 
000207 


105737 
001404 
005037 
105037 
000297 


010046 
910346 
042703 
052703 
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000315 


017777 
000040 


000315 
000315 
000100 


160uU00 


000276 


177572 
000276 


017777 
010000 


$GTS! 2: 


GETSI2: 


23: 
4S: 


6S: 


CLRMM: 


1%: 


;x GET B 
REGISTE 


12:37 PAGE 68 
CONVERT 18 


ANK NO. UNDER TEST 


BIT ADDRESS TO THE PAR FORM 


D 6 
SEQ 0068 


CONVERT 18 BIT ADDRESS TO THE PAR FORM 


THIS SUBROUTINE IS USED TO CONVERT 18 BIT ADDRESS STORED IN 
LOCATIONS POINTED BY R3 AND R342 TO THE FORM IT WILL BE STORED 
IN A PAR. THE RESULT IS LEFT IN RZ. R1 IS LOADED WITH BITS 
0-12 OF THE ADDRESS AND RO WITH 160000 


ae SAVKBB ;PREPARE TO PLACE ADDRESS BITS 13-17 IN BITS 
;0-4 OF RZ 
(R3)+,R1 
(R3),R2 ;LOAD R2 WITH THE LOW ORDER BITS OF THE ADDRESS 
#17777,RZ 
‘wrleas 
1 
- ;ROTATE R1 AND R2 7 TIMES 
y 
a# SAVKBB 
6% 
a* SAVKBB 
_— 
y 
(R3)+,R1 ;PLACE THE LOW ORDER ADDRESS BITS IN Ri 
#160000, RO 
RO.R1 ;LEAVE BITS 0-12 OF THE ADDRESS IN R1 
PC ;RETURN FROM THe SUBRORNE 


THIS SUBROUTINE 1S CALLED TO DISABLE THE MEMORY MANAGEMENT 
UNIT 


de NMAVA >WAS THE MEMORY MANAGEMENT ENABLED ” 
1% > 1F NOT THEN GO TO 1$ 


d# SRO >DISABLE THE MEMORY MANAGEMENT 
ae NMNAVA ;AND DO NOT ATTEMPT TO TEST MEM. MANAG. 
PC >RETURN FROM THE SUBROUTINE 


CALLED BY ERRTYP AND TST13 TO GET BANK NO. UNDER TEST !NTO PBNK. 


RS 


;CLEAR ADDRESS BITS 0-12 


;RO=POINTER TO PAR UNDER TEST 
;R3=VIRTUAL ADDRESS ON ENTRY 
;RO+R3 ARE RESTORED ON EXIT. 


GE TBNK: 


MOV 
MOV 
BIC 
BIS 


RO, - (SP) +SAVE RO 

R3,-(SP) > SAVE R3 

#17777,R3 ;SAVE ONLY VIRTUAL BANK BITS 
*#10000.R3 ;SETUP R3 SHIFT BIT 
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007444 
007446 
007450 
007452 
007456 


007460 
007462 
007466 
007470 
007472 
007474 
007476 
007502 
007504 
007506 


007510 
007516 


007520 
007524 
007530 
007532 
007536 
007542 
007546 
007550 
007554 
007556 
007560 
007562 
007566 
007570 
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000241 
006003 
103376 
105737 
001407 


006303 
062703 
011300 
006300 
000300 
110003 
010337 
012603 
012600 
000207 


032777 
001460 


012790 
012710 
060710 
005037 
012701 
012703 
010241 
050337 
000241 
006003 
103372 
012710 
005702 
001433 


15-AUG-77 


12: 36 


000276 


172340 


N00312 


004000 
000004 
000122 
000352 
172140 
100000 


000352 


000104 


170732 
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SUBROUTINE TO DISABLE MEMORY MANAGEMENT 


1$: 


*;GET PAR ADDRESS AND PHYSICAL BA 
ASL R3 


; PARITY ENABLE/DISABLE ROUTINE 


, 


>REGISTER USAGE. 

; POINTS TO BUS TIMEOUT TRAP VECTOR (LOC. 4) 
HOLDS PARITY MODULE UNIBUS ADDRESS. 

ON ENTRY HOLDS ENABLE/ZDISABLE CODE . 


>R1i= 
;R2= 


, 


R3= 


;CALL IS 


4 


, 


PARITY: 


2S: 


33: 


CLC 
ROR R3 
BCC 1$ 

TSTB ae MMAVA 
BEQ 2$ 

S$ 

ADD #172340.R 
MOV (R3),RO 
ASL RO 

SWAB RO 

MOVB RO. R3 
MOV R3, d#PBNK 
MOV (SP)+,R3 
MOV (SP)+,R0 
RTS PC 


3 


;SHIFT A BANK BIT 

;UNTIL IN BITS <2: 0> OF R3 
;MEMORY MANAGEMENT UNDER TEST? 
;NO EXIT 


NK NO. 


;MAKE R3 PAR ADDRESS OFFSET. 
;MAKE FULL PAR ADDRESS. 
;GET PAR CONTENTS 


;SHIFT BANK BITS TO BITS <7: 0 
;SET R3 TO PHYSICAL BANK NO. 
+STORE PHYSICAL BANK NO. 
+RESTORE RS 

*RESTORE RO 

;RETURN TO CALLER 


SEQ 0069 


THIS ROUTINE ENABLES OR DISABLES PARITY MODULES AND PRINTS ASSOCIATED MEASSAGES. 


IF PARITY AVAILABLE THEN BIT13 OF "REL" IS SET AND "PAR"ITY IS PRINTED. 


ALSO THE BACKGROUND TEST PATTERN (LOC. BAKPAT) IS SET=376 


IF R2=0 THEN DISABLE 
I\F R2=1 THEN ENABLE 


#1,RZ 


PC, PARITY 


#4000. dSWR 
6$ 


#4,R0 
#5$-. -6, ( 
PC, (RO) 
a# PARMAP 
#172140.R 
#100000.R 
R2Z2,-(R1) 


RO) 


1 
3 


R3, d#PARMAP 


R3 


2$ 
*BUSER, (RO) 


R2 
6$ 


SCRATCH TO SETUP LOC. PARMAP WITH A MAP OF PARITY MODULES PRESENT. 


*ENABLE CODE 


;PARITY TEST WANTED? 
;BRANCH IF NO 


>POINT RO TO BUS TIMEOUT ADDRESS. 

+SET RETURN FROM TIMEOUT TRAP TO 5% 

> IN THE CURRENT BANK. 

>CLEAR PARITY MAP HOLDER. 

>SET R1 TO LAST PARITY MODULE ADDRESS+2 
;SET R3 TO PARMAP AVAILABLE CODE BEGIN. 


;ENABLE A PARITY MODULE+TRAP IF NOT AVAILABLE. 


+NO TRAP TO 5%. SO SET PARITY AVAILABLE. 


;SETUP NEXT PARMAP BIT 

>BRANCH IF NOT DONE ALL PARITY ADDRESSES. 
;RESET BUS TIMEQUT TRAP VECTOR 

+ 1S THIS A DISABLE CALL? 

;BRANCH IF YES (EXIT) 


re ee ee ee we ee = 
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007572 
007576 
007600 
007604 
007612 


007614 
007620 
007622 
007630 
007636 
007642 
007650 


007652 


15-AUG-77 


005737 


000053 


152737 
012737 


004767 
040520 

000 
007652 
000405 


15-AUG-77 12: 
12: 36 


000352 
176760 
050040 


176322 


000040 
000376 


176722 
044522 


051101 


000405 
000316 


054524 


ee ae ee ae ees 


F 6 


37 PAGE 70 
SUBROUTINE TO DISABLE MEMORY MANAGEMENT SEQ 0070 
TST a#PARMAP ;WERE ANY PARITY MODULES FOUND? 
BNE 4§$ ;BRANCH IF YES 
JSR PC, TPCRLF ;PRINT "NO PAR" 
ASCIZ /NO PAR/ 
. EVEN 
JSR PC, FATERR ;KXERRORX REPORT ERROR MESSAGE AND HALT AT FATHLT 
53 + XXXXXXERROR NUMBER S3XXkxKx% 
4S: BISB #40, O#REL +SET PARITY UNDER TEST FLAG 
MOV #376, d#BAKPAT ;SET BACKGROUND PATTERN TO 
*WORST CASE PARITY CODE. 
JSR PC, TPCRLF ;PRINT “TST PARITY" 
ASCIZ /PARITY/ 
. EVEN 
BR EXITC ;AND EXIT VIA RTS PC 


GET HERE IF PARITY ADDRESS TIMED OUT TO LOC. 4 
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007654 
007656 


007660 
007666 
007666 


007670 
007674 
007700 
007702 
007706 
007712 
007716 
007720 
067724 
007730 


007734 


007744 


022626 
000737 


142737 
000207 


105037 
105737 
100372 
113702 
042702 
122702 
001363 
110237 
004767 
041536 
007734 
000167 


007744 
000000 


000001 


15-AUG- 77 
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000040 000405 


000315 
177560 


177562 
000200 
000003 


000315 
17€634 
U00 


175104 
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SUBROUTINE TO DISABLE MEMORY MANAGEMENT 


55: 


65: 
EXITC: 
7%: 


> CHECKC 
TEST OR 


CHECKC: 


27744 


CMP 
BR 


BiCB 
RTS 


;RESET STACK FROM TRAP 
+KEEP TRYING PARITY ADDRESES. 


;CLEAR PARITY TESTING FLAG 


(SP)+, (SP)+ 
3$ 


#40, OFREL 


PC ;RETURN TO CALLER 


THIS ROUTINE CHECKS IF CONTROL-C WAS TYPED AT THE END OF EACH 
IN THE ERROR TYPE ROUTINE. 

:1F CONTROL-C TYPED THE PROGRAM IS RETURNED TO LOWER MEMORY IF IT WAS 

;RELOCATED AND THE ERROR HISTORY IS PRINTED OUT. 

>FINALLY IT HALTS AT FATHLT. 


CLRB 
TSTB 


ENDPRG: 6 


. END 


d*# SAVKBB ; INIT CONTROL-C FLAG. 

a* TKS ;ANY CHAR. TYPED? 

EXITC ;BR IF NO-EXIT VIA RTS PC- 
d# SKBB,. RZ +GET THE CHAR TYPED. 


#200,R2 ;CLEAR THE PARITY BIT. 
#3,RZ > 1S |T CONTROL-C? 


EXITC *BRANCH IF NO -EXIT VIA RTS PC- 

RZ, A#SAVKBB >ELSE STORE THE CHAR. FOR USE AS A FLAG. 

PC, TPCRLF >PRINT " C"™ 

fir 

RELOER >GO RETURN PROGRAM TO LOWER CORE IF RELOCATED. 


> THIS BEGINS THE STORAGE FOR THE ERROR HISTORY 

> STACK. FOR EACH 4K BANK 18. BYTES ARE SAVED. 
-ALSO THE ABSOLUTE LOADER AND XXDP CODE IS SAVED 
>AFTER THE ERROR STACK. 

>FOR 4K MEMORY SIZE THEN PROGRAMN=7744+22=7776 


SEQ 0071 


H 6 
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DZKMAD.P11. 15-AUG-77 12: 36 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0072 | 
ABASE = 000000 1222 ! 
ACDW1 = 000000 1222 | 
ACDW2 = 000000 1222 | 
ACPUOP= 000000 1222 1237 
ACT11 005526 2711 27188 | 
ADDWO = 000000 1222 
ADDW1 = O00000 1222 | 
ADDW10= o00000 1222 | 
ADDW11= o00000 1222 
ADDW12= 000000 1222 
ADDW13= 000000 1222 
ADDW14= 00000 1222 
ADDW15= 00000 1222 | 
ANDW2 = 000000 1222 | 
ADDW3 = 000000 1222 
ADDWY = 000000 1222 | 
ADDWS = 000000 1222 
ADDWe = 000000 1222 
ADDN? = o00000 1222 
ADDWS = 000000 1222 
ADDWS = 000000 1222 
ADEVCT= 000000 1222 1228 
ADEVN = oOC0000 1222 
AENY = O00000 1222-1233 
AENYM = 000000 1222-1234 
AFATAL= 000000 1222-1225 
AMADRi= 000000 1222 1260 
AMADR2= 000000 1222-1254 
AMADR3= 000000 1222. 1257 
AMADRY= 000000 1222 1260 
AMAMS1= 000000 1222-1244 
AMANSZ2= 000000 1222-12852 
AMAMS3= 000000 1222 1255 
AMANSY= 000000 1222 1258 
AMSGAD= 000000 1222-1230 
AMSGLG= 000000 1222-1231 
ANSGTY= 000000 1222-1224 
ANTYP1= 000000 1222 1245 
AMTYP2= 000000 1222 1283 
ANTYP3= 000000 1222-1256 
ANTYPY= OOC000 1222 1259 
APASS = 000000 1222 1227 
APRIOR= OOO0000 1222 
APTHLT 006206 2739 ss 28568 
APTSIZ 000724 1322 13308 
ASWREG= 000000 1222-1235 
ATESTN= 000000 1222 1226 
AUNIT = 000000 1222 1229 
AUSWR = 000000 1222 123e¢ 
AVECTi= 000000 1222 ! 
AVECT2= 000000 1222 | 
BAKPAT 000316 1047s: 11828 1724 1745e 1809 1841% 2023% 2059 2094x | 
2145 2151 2307 23623% 2364 2546% 2290% 
BEGIN 000500 1055 1185 582 
BRTPSZ 001012 13548 
BUSER 900104 10278 1397 | 
| 
4 
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DZKMRD. Pil 15-AUG-77 i2: 36 CROSS REFERENCE TABLE -- USER SYMBOLS SEQ 0073 © 


CHECKC 007670 1568 2830 33178 

CKDONE 005112 2551 2574 25848 

CLRMEN 001472 14958 2616 

CLRMMN 007410 1429 1451 2729 32058 

CNTSCP 001650 1567 15708 

CONT 001532 15128 1581 

CONTMM 005140 2548 25958 

CTLC 005574 2708 27388 

DECWRD OO00SI12 11678 1168 2677* 2680% 2716k% 2998 

ENDPRS 005302 2593 26538 

ENDPRG 007744 1093 1288 265? 2775 33318 

ENDSTK Q00310 11648 1165 1416% 2661 2732 

ENDO 002136 16668 1708 

END1 002236 17088 1748 

ENDIO 003776 2215 22238 2366 

ENDiZ 004322 23668 2476 2508 

END2 002346 17488R 1844 

END3 002614 18448 1883 

END4Y 002724 18838 1969 

ENDS 003072 19698 2025 

END® 003226 20258 2102 

END? 003450 21028 2223 

ERROR 005604 1625 1686 1740 1805 1869 1909 1916 1943 2001 2076 2156 2172 2181 

2326 2334 2461 2473 2490 27498 =§=62903 

ERRTYP 005722 27328 

EXiITC O007666 3296 33048 3319 $323 

EXTYP 006562 2904 2971 2976% 

FRILNM 005400 2676 26808 2693 

FATERR 006142 1301 1349 1452 148% 1652 28448 2914 3109 3285 
FATHLT 006214 2822 28588 

FATYP 006770 2855 30518 

FNDERR 006070 28198 2857 

GALLOP 003476 21398 2273 

GETADR 007314 1352 1353 31628 

GETBNK 007430 2533 2756 32198 

GETSIZ 007334 2597 26608 2613 31808 

HIGHAD Q00332 11938 1338 

HIGHTW QO00330 11928 1337 1407 

LOOP 001542 15158 1579 

LOWADD 000326 11908 

LOWBNK OQ00304 11578 1158 ZO46* 82057 2092 

LOWER 005116 2584 25888 
;LOHTHO OOC224 1189¢ 8§=6©9400 1462 2696 

nM = 000200 1002 2490 

MAXADR 005230 2611 2614 26258 

MAXMEM OO00340 11998 1336 1420% 1642 183§ 2439 2562 2578 
MEMMNG 007044 1372 2590 30778 

MENTST 001464 14898 

MMAVA = =©000276 11398 1142 1374 2547 2592 3078% J086* 3129 3205 3208% 3226 
MMREG 007050 1385 2607 30788 3115 

N = 000054 10028 1201 13048 1349 1362 1462 14658 1484 14878 1596 15998 1610 16128 





16558 1678 16818 1686 16898 1721 17248 1740 
1800 18028 1816 18188 1853 18568 1869 1872% 
19198 19423 194oR 1991 19948 2001 2004" $2042 

é 21758 2181 21848 2258 2261% 
23378 2399 24028 24el 24m4R 2472 24768 82490 


A ee - — —_— © oo ee + oe oe eee 
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24938 2903 29068 2913 29178 3109 31128 3285 32888 

NoMMN =» 007170 3083 = 31048 

NOTYP 006450 29478 2983 2985 

OCTTYP 006724 1402 1406 =: 3035: 

OCTXT 007042 3031 ©3034 «= - 30678 

ONEPAS 000556 1282 12858 

PARERR 006222 1278 «=. 28758 

PARFL 005436 2673 = 26928 

PARITY 007510 1500 2706 32628 

PARMAP 000352 12078 2881  3268% 3272x 3279 

PARPS 000360 {2108  2876x 2908 

PARSP 000356 12098  2875x 2909 

PASFLG 900306 11598 1163 15128 i1879% 1947k 19644 1996x 2007 2009 2022" 2045% 2067 2083 
2085 2090 2304k 2321 2341 2347" 2348 23564 2357 2444 2451 2466 2484 
2501 2511" 2522x 2539% 2764 

PBNK 000312 11668 2757 3236% 

PCRLF 006552 1401 29738 297 2995 3032 

PNTNES 006572 1055 2266 2629 2659 2926 2934 29828 

PUTADR 007224 1389 «61392, 1818 = 2812-31278 

PURON 000070 10208 1274 

PHRUP 000136 1020 = 10548 

REL 000405 11348 1281 8691475 = 25250 25520 255ux «025730 2880% 863.2898 «= 3303 

PELBOT 000322 11858 1477 

RELOC 004752 1S4S =. 25408 

RELOER 05044 2553 25728 = 332 

RESTRT 000250 1069 1085 1087 10938 2727 2859 

RETHM 007166 3031 = 31028 

RETSTK 005342 26648 2668 2691 

RETTYP 006510 2951 29608 

RLODER 005552 272 27298 273 

RPTOCT 006760 2688 30488 Nee 

RPT10 003472 21378 2222 2268 

RPT11 004036 2218 2221 2264 22678 

RPT 003112 19948 2024 

SAVKBB 000315 11718 2588 2707 31778 2187? 31898 33178 33248 

SAVLOR 001246 1422 1424 14298 

SAVLOC 000354 1208  2017% 

SAVMAX (00342 12018 1487 

SAVRO 006374 2879% 2906 29208 

SAVR1 006376 2880" 2907 29218 

SAvRY 000344 12028 2730 

SAYVRS 000346 1094 12038 14508 2572 26818 

SAVR6 000350 1054 1079 1206 1273" 1629 2683" 72877 

SCOPE = 000240 10038 | 

SEQERR 006142 159% 1678 721 +1765 1853 1902 1991 2042 2133 2258 2298 2399 2yuse 

SETSTK 001170 1287 14078 

SETSWR 000656 13128 

SLFSIZ 001024 13638 

SRO 177572 11818 3085 3099" 3207% 

START 000200 1062 10798 

STRTDi 000302 11558 1156  2055% 2084 

SHAPAT 000320 11848 2176 2180 22098 

SWHALT 001670 15768 

SWR 000450 12678 1315 13188 13238 1356 1400 1504 1574 1578 639 2262 2267 2525 
25650 2653 2710 279% (2828 2982 3030 3080 3262 

SWREG  GO0176 10728 1318 
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Swill = 004000 10028 
TEL 001604 1832 15368 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 
! 
TKS = 177560 11778 3318 
TPADER 006400 2675 2805 29248 | 
TPCPLF 006564 1088 2712 2845 2978% 2986 3105 3281 3292 3725 | 
TPPRER 006424 2692 2801 29328 | 
TRYSR 001014 1340 13568 
TSTGO 001672 1575 15788 | 
TSTMM § =©.005124 1465 25908 
TSTREL 001224 1283 14508 
TSTRP 000570 1286 12888 
TSTSCP 001636 1566% 1666 
TSTS1Z 001330 14518 
TSTO 001706 1536 15948 
TST1 002140 1537 16748 
TST10 003452 1544 21308 
TSTi1 904000 1545 22558 
TST12 004052 1546 2296% 2365 
TSTi3 004324 1547 23978 
TST2 002240 1538 17188 
TST3 002350 1539 17638 1842 
TST4 002616 1540 18518 
TSTS 002726 1541 1899% 
TST6 003074 1542 19878 
TST? 003230 143 20398 
TYPCNT 000314 11098 1276% 2687% 2810x 2851% 3038% 365% 
TYPDEC 006614 2679 29958 
TYPENB 000277 11438 1146 2782% 27984 2924 2932 
TYPEOP 005474 27128 
TYPERR 006702 2814 302308 
TYPMEM 001156 14038 
TYPOCT 006734 3033 20398 
TYPSIZ 001134 1354 1357 13978 
TYPSTK 005322 26598 2665 
UPMM 007216 2595 31148 
WRTMEM 000120 10468 1769 1905 1994 
$A = 000001 3908 392 393% 395 396% 400 uO1k 405 4O6# 410 411% 416 
42 4248 429 4308 434 4 35% 438 439% 442 U4 Zh Y4UB 447% 
uS18 usu 4558 u58 y59# 462 4638 466 467% 471 472% 475 
479 480# 483 USus 48? USse 489 4908 497 498% 501 502% 


506% 516 517% 520 6218 529 5308 533 5 S4a 536 537% 542 
546 5478 550 551% 554 655% 562 5638 566 567% 570 5718 
576% 580 581% 587 5888 593 S948 597 5988 602 603% 6068 


SADERR 000301 11518 1154 1617% 1738k 1802* 18674 2786 2803 
SAPTHD 000276 1119 11258 1138 

SCNTMMN 005144 2594 25968 

SCPUOP 000426 12378 

SDEVCT 000410 12288 1572% 2082% 2205% 

SDOAGN 005546 2719 27278 

SENDAD 000156 1014 10658 2725 

SENV 0004 20 12338 1321 1566 2819 2856 
Stnvm 000421 12348 81339 1637 2966 

SE OP 005444 2654 2662 27058 

SETABL 000420 12328 


SETEND 000450 1131 12618 
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SFATAL 000402 12258 2749k 2758k 2766 Z2850x 2853 

$GTSIZ 007330 1408 1523 31778 

SHD == 000002 993 

SHIBTS 000276 11268 

SHIMAX O00334 11968 1337% 

SKBB = 177562 11788 3320 | 

SMADR1 000432 12508 

SMADRZ 000436 12548 

SMADRS O00442 12578 

SMADRY OO00446 12608 

SMAIL O00400 1082 1127 1131 12238 1293 1308 

SMANS1 000430 12448 

SMANSZ 000434 12528 

SMANSS O00440 12558 

SMAMNSY O00444 12588 

SMAXMN 000336 11978 1338% 

SMBADR 000300 11278 

SMSGAD 000414 12308 

SMSGLG O0004%16 12318 

SNSGTY 000400 1027% 12248  2821% 

SNTYP1 000431 12458 1346 

SMTYPZ2 O00435 12538 

SMTYP3 OGO441 12568 

SMTYP4Y OO0044S 12598 1342 

SNWTST= 000001 1682# 1584 16609% 1671 17108 1712 17528 1754 1845# 1847 1885# 1887 19718 
1973 ZO28# 2030 21038 #2105 22278 2229 22748 2276 23678 #2369 

SPASS 000406 12278 1285 2709k% 2716 

SPASTM O00304 1129% 

SPRERR 000300 11478 1159 12762 2783 2799 2816%  2902x 

SRETNM 007160 31008 3112 

SSVPC = OOUU44 1012 $017 

SSWR = 000000 Assy 1002# 1595 1675 1719 1764 1852 19006 1988 2040 2131 2256 2297 

SSWREG 000422 12358 1323 

STESTN 000404 1086 1134 12268 1513k 1570 1594 1674 1718 1763 1851 1899 1987 2039 
2130 2187 2195 2220 2255 2296 2397 

STN = 000014 983% 993 1582 15958 1669 1675# 1710 17198 1752 1764" 1845 1852% 1885 
19008 1971 19888 2028 20408 2103 21318 2227 22568 $2274 22978# 2367 23988 

STPB = 177566 11808 2970% 

STPCHR 006526 2957 29668 $3057 

STPDEC 006620 2534 2681 2717 29978 

STPNUMN 006772 3047 30528 

STPS = 177564 11798 2968 

STPSTK 005312 2589 26558 

$TSTM 000302 11288 

STYPE O06464 1403 29528 2973 2979 3010 3048 

SUNIT 000412 1680 12298 

SUNITM 000306 11308 

SUSWR 000424 12268 

$2 = 000362 1215% 

$22 = 007740 33308 

$$m = 000200 24908 

| = 007746 1000 10058 1012 10138 1015 10178 #10198 10258 1032% #10718 1115 11168 11188 
11208 11388 11428 11468 11508 11548 11568 11588 11638 11658 11688 1215 1218% 
12698 12? 1532 1595 1647 1677 1720 1764 1852 1901 1990 204 1 2132 
2257 2297 2398 2517 25328 27158 2775 29758 108% 3266 22848 32958 33278 
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33308 
$x = 000276 11158 1120 
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ERRLST 390% 392 395 400 405 410 416 423 429 4 34 438 442 446 450 454 
458 462 466 471 475 479 483 487 489 497 501 505 516 520 529 
533 536 542 546 550 554 562 566 570 575 580 587 593 597 602 

MSG 15828 1584 1669% 1671 17108 1712 17528 = =1754 1845# 1847 1825# 1887 1971# 1973 20288 
2030 21038 $2105 2227# 2229 2274% 2276 23678 2369 

NEWTST 983% 1582 1669 1710 1752 1845 1885 1971 2028 2103 2227 2274 2367 

PLCERR 998% 1610 1613 1621 1790 1800 1816 

STARS 9838 1010 1075 1078 1112 1114 1121 1187 1194 1221 1264 1266 1582 1593 1669 
1673 1710 1717 1752 1762 1845 1850 1885 1898 1971 1986 2028 2038 2103 2129 
2227 2254 227 2295 2367 2396 

SERRNM 998% 1686 1740 1869 1909 1916 1943 2001 2076 2156 2172 2181 2326 2334 2461 
2473 2490 2903 

SFATAL 3918 292 395 400 405 410 416 423 429 434 438 442 446 450 454 
458 462 466 471 475 479 483 487 489 497 501 505 516 520 529 
633 536 542 546 550 554 562 566 570 575 580 587 593 597 602 

SF TERR 998% 1301 1349 1462 1484 1652 2913 3109 3285 

SSQERR 998% 1596 1678 1721 1765 1853 1902 1991 2042 2133 2258 2298 2399 

SSNEWT 9838 1582 1669 1710 1752 1845 1885 1971 2028 2103 2227 2274 2367 

. HEADE 9838 

. SACT1 983% 1008 

. SAPTB 9838 1219 

. SAPTH 983" 1110 


ABS. 007746 000 


ERRORS DETECTED: 0 


DZKMAD. BIN, DZKMAD. LST/CRF/SOL/NL: TOC=DZKMAD. P11 
RUN-TIME: 8 8 .5 SECONDS 

RUN-TIME RATIO: 271717=15. 6 

CORE USED: 11K (21 PAGES) | | 


